Nothing
labelCANSIM <- function(df){
for(i in 1:ncol(df)){
label(df[[i]]) <- names(df[i])
if(i > 2) names(df)[i] <- paste0("V", i-2)
label(df[[1]]) <- "period"
label(df[[2]]) <- "id"
}
return(df)
}
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.