r - 将名称列为列表中的向量

Question

从以下列表中获取的最快方法是什么：

 set.seed(1)
 mylist <- list(1:2,1:3,1:4)
 names(mylist) <- sample(LETTERS,3)

 mylist
$J
[1] 1 2

$V
[1] 1 2 3

$Z
[1] 1 2 3 4

到具有包含列表名称的额外向量的列表，即

mylist
$J
[1] 1 2
[2] J J

$V
[1] 1 2 3
[2] V V V
$Z
[1] 1 2 3 4
[2] Z Z Z Z

结果同样可以是数据框列表。某种

lapply(mylist, function(x) { data.frame(x=x,y=names(x)})

score 10 · Accepted Answer

另外一个选项：

df<-stack(mylist)
split(df, df$ind)

也许这stack(mylist)就是你真正需要的？

score 4 · Accepted Answer

就个人而言，我喜欢@Matthew Plourde 使用stack

这是一个使用mapply保留原始列表相同结构的选项

mapply(function(L, N) 
     {names(L) <- rep(N, length(L)); L},   mylist, names(mylist))

$G
G G 
1 2 

$J
J J J 
1 2 3 

$N
N N N N 
1 2 3 4

2 回答 2