Nothing
gf_point(length ~ width, data = KidsFeet, color = ~ sex) %>%
gf_lm() %>%
gf_refine(scale_color_manual(values = c(B = "navy", G = "red")))
gf_bar(~ sex, fill = ~ substance, position = "dodge", data = HELPrct) %>%
gf_refine(scale_fill_brewer(type = "qual", palette = 3))
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.