这个包的神奇之处在于能批量处理问题,例如,可以读取多个文件,跑模型的时候,可以批量输入多个参数,并把结果合并起来做比较
install.packages("purrr")
接下来我们通过实例来看下此包的具体使用...每个子列表的深度计算
##判断子列表数据是否存在,完整子列表值的匹配,返回TRUE/FALSE
x <- list(1:10, 5, 9.9)
x %>% has_element(1:10)
## list中值的添加和修改...函数参数载入
##数据参数引入
invoke(runif, list(n = 10))##相当于runif(10)
##函数参数引入
invoke(paste, list("01a", "01b"),...子列表的批量操作
##基础函数操作
1:10 %>%
map(rnorm, n = 10)
##自定义函数
1:10 %>%
map(function(x) rnorm(10, x))
##基于公式的操作...1:10 %>%
map(~ rnorm(10, .x))
##返回数据框
1:10 %>%
Map_dfc(rnorm, n = 10)
##判断需要操作的子列表中的所有值
map_if(