df <- tibble::tribble( ~sev_curve, ~curve_type, ~trend_date, ~weight,
"MILO", 'HOSPITALS', '7/1/2020', 0.4,
'ALSO', 'PHYSICIANSC', '7/1/2020', 0.6)
df %>% mutate(c=purrr::pmap(df, function(#how to reference columns?) {...}))
所以我需要使用 purrr::map 在上述数据帧的每一行上应用一个函数。但是,肯定只有 sev_curve 和 weight 列存在。其他 2 列可能存在也可能不存在,并且可能有其他列可以代替它们,等等。