create_vector <- function(comma_separated_string) {
x_list <- unlist(strsplit(comma_separated_string, ",", fixed = TRUE))
if (all(is.na(x_list) == FALSE)) {
return(x_list)
}
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.