Nothing
# for sharing data
mask_data <- function(d) {
validate_cells(d)
if (hasName(d, "type")) {
d0 <- d %>% mutate(value = recode(type, attribute = "A", value = "0", empty = ""))
} else {
d0 <- d %>% mutate(value = recode(data_type, character = "A", numeric = "0"))
}
as_tibble(d0)
}
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.