Nothing
library(dplyr)
results <- mtcars %>%
group_by(cyl) %>%
summarize(mean = mean(mpg))
glimpse(results)
results %>%
tidyr::pivot_wider(names_from = cyl, values_from = mean)
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.