将数据帧转换为特殊格式的列表以用于函数

一种方法是使用 plyr . 我想你可能还有不止两列,所以让我们

df <- data.frame(name = c("chr", "test"), ncol = c(2, 3), a = 1:2)
#   name ncol a
# 1  chr    2 1
# 2 test    3 2

然后

dlply(df, .(name), function(r) as.list(r[-1]))
# $chr
# $chr$ncol
# [1] 2
#
# $chr$a
# [1] 1
#
#
# $test
# $test$ncol
# [1] 3
#
# $test$a
# [1] 2
#
#
# attr(,"split_type")
# [1] "data.frame"
# attr(,"split_labels")
#   name
# 1  chr
# 2 test

一个选择是 split 从 base R

split(setNames(as.list(df$ncol), rep('ncol', nrow(df))), df$name)