Nothing
## ---- eval=FALSE--------------------------------------------------------------
# library(onmaRg)
# library(ggplot2)
#
# DA_2016 <- om_geo(2016, "DAUID", "sf") %>%
# filter(CSDNAME == "Toronto")
#
# plot <- ggplot() +
# geom_sf(data=DA_2016, aes(fill=DEPRIVATION_Q_DA16))
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.