Nothing
#' Helper function to convert keys from text to nested lists
#'
#' Convert settings keys from text vectors (using the "--" delimiter) to a list of lists
#'
#' @param textKeys a list (or vector) of character keys using the "--" delimiter to indicate hierarchy
#' @return A list of unnamed lists, with position in the nested list indicating hierarchy
#'
#' @examples
#' safetyGraphics:::textKeysToList("id_col")
#' #list(list("id_col"))
#'
#' #list(list("id_col"),list("measure_col","label"))
#' safetyGraphics:::textKeysToList(c("id_col","measure_col--label"))
#'
#' @keywords internal
textKeysToList <- function(textKeys){
return(as.list(textKeys) %>% map(~as.list(str_split(.x,"--")[[1]])))
}
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.