mp_belabelung <- function(data) {
namelist <- list()
for(i in 1:ncol(data)) {
data <- as.data.frame(unique(data[,i]))
colnames(data) <- NULL
namelist[[i]] <- data
}
return(namelist)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.