Nothing
#' @title Convert the data frame into list of numeric nature
#' @param data1 data-frame to be converted into list
#' @return list of numeric vectors
convert<-function(data1){
data1<- as.data.frame(sapply(data1, as.numeric))
data1<-as.list(data1)
return(data1)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.