r - 将数据帧转换为特殊格式的列表以供在函数中使用

Question

我有一个如下所示的数据框:

df = data.frame(name = c("chr", "test"), ncol = c(2, 3))

但是，为了输入函数(ComplexHeatmap)，我需要一个如下所示的列表:

list(chr = list(ncol = 2), test = list(ncol = 3))

从该数据帧转换为该格式的列表的最简单方法是什么？执行 as.list 无法获得正确的格式。

谢谢! jack

Answer 1

一种方法是使用 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