source("data-raw/util.R")
quality <- "SELECT * FROM [sunny-573:pokodata.data_quality]" %>% query
quality %>% write.csv("data-raw/quality.csv", row.names = F)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.