r - 访问嵌套结构

Question

是否有一些不错的设计可以在嵌套结构中调用数据，例如

a<-list(list(LETTERS[1:3],LETTERS[1:3]),list(LETTERS[4:6]))
lapply(a,function(x) lapply(x, function(x) x)) 

但 unlist 不是一种选择。

Answer 1

递归lapply...又名rapply？

rapply( a , c )
[1] "A" "B" "C" "A" "B" "C" "D" "E" "F"

Answer 2

不如@SimonO101 的答案好，但只是为了提供替代方案，您可以使用do.call

> do.call(c,do.call(c, a))
[1] "A" "B" "C" "A" "B" "C" "D" "E" "F"

也使用Reduce

> do.call(c, Reduce(c, a))
[1] "A" "B" "C" "A" "B" "C" "D" "E" "F"