itemHash <- function(string) {
str_replace_all(str_to_lower(string), '\\W+', '')
}
name_getter <- function(name) {
return(function(thing) {
thing[[name]]
})
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.