RemoveSymbols <-function(df) {
df %>% dplyr::mutate_all( dplyr::funs(gsub("^[^A-Z0-9]{1,}", "", ., ignore.case = FALSE))) %>%
purrr::map_df(readr::parse_guess)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.