Add Table Caption to RHandsontable in R

I have the following dataframe in R

  library(rhandsontable)  library(data.table) ###LIBRARIES IMPORTED

We next create the dataset

  DF = data.frame(val = 1:10, big = LETTERS[1:10],                            small = letters[1:10],                         stringsAsFactors = FALSE)

We now render a datatable with a caption

  datatable(DF,caption = htmltools::tags$caption(   style = 'caption-side: top; text-align: center;','Table 1: ', htmltools::em('Trial Data')))

Can a similar table caption be created using RHandsontable

  rhandsontable(DF, colHeaders = c("A", "B", "C")) %>%  hot_cols(colWidths = 75)

I Request someone to take a look.