我有一个简短的问题,我想取消这个嵌套列表的嵌套:
mylist <- list(a = list(A=1, B=5),
b = list(C= 1, D = 2),
c = list(E = 1, F = 3))
Run Code Online (Sandbox Code Playgroud)
预期结果是:
> list(a=c(1, 5), b = c(1, 2), c = c(1, 3))
$a
[1] 1 5
$b
[1] 1 2
$c
[1] 1 3
Run Code Online (Sandbox Code Playgroud)
有什么建议么?
时间
与其他人略有不同并将其保留在基础中:
lapply(mylist, unlist, use.names=FALSE)
## $a
## [1] 1 5
##
## $b
## [1] 1 2
##
## $c
## [1] 1 3
Run Code Online (Sandbox Code Playgroud)