Notes on how to use the dplyr package in programming settings
creates a new variable called 'avg', equal to the values in var
pt_est = pt_est %>%
mutate_(.dots = setNames(var, 'avg'))
df = df %>%
mutate_(.dots = setNames(
list(paste0('forcats::fct_infreq(factor(', var, ',',
'levels = ', list(codebk$code), ',',
'labels = ', list(codebk$names),'))'
)), new_var))
df2 = df %>%
group_by_(time_var, region_var) %>%
summarise_(.dots = list(N = 'n()',
avg = paste0('mean(', var, ')')))
facet_order = df %>%
filter_(paste0(time_var, '==', max_time))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.