library(dplyr)
# Summarize ToothGrowth data
tg <- ToothGrowth %>%
group_by(supp, dose) %>%
summarise(length = mean(len)) %>%
as.data.frame()
save(tg, file="../data/tg.rda")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.