# using mac data
source("scripts/setup.R")
loadd()
mac_raw %>%
filter(year == 2030) %>%
group_by(sector) %>%
summarize(tot_q = sum(q, na.rm = TRUE))
mac %>%
filter(year == 2030) %>%
group_by(sector) %>%
summarize(tot_q = sum(q, na.rm = TRUE))
nrow(mac_raw)
nrow(mac)
# ummmm
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.