Make a list of assignments, applying each function to each column named. Intended to be used as an argument in extend_se() or project_se().

make_assignments(columns, funs, ..., sep = "_", prefix = TRUE)

Arguments

columns

character, vector of column names to take values from.

funs

character, names of functions to apply.

...

not used, forced later parameters to bind by name

sep

character, naming separator

prefix

logical, if TRUE place function names prior, else after in results.

Examples

assignments <- make_assignments(c('x', 'y'), c('mean', med = 'median')) print(assignments)
#> mean_x mean_y med_x med_y #> "mean(x)" "mean(y)" "median(x)" "median(y)"
ops <- mk_td('d', c('x', 'y')) %.>% project_se(., assignments) cat(format(ops))
#> mk_td("d", c( #> "x", #> "y")) %.>% #> project(., mean_x := mean(x), mean_y := mean(y), med_x := median(x), med_y := median(y), #> groupby = c())