如何将R列表的元素彼此附加,但仅附加顶级?

问题描述

我需要附加包含在顶级列表中的列表。应该保留其他级别,并且可能有两个以上的元素。

FontFamily

解决方法

1)我们可以将l <- list(list(1:5),list(6:10)) required <- c(l[[1]],l[[2]]) 中的flattenc

base R

-输出

do.call(c,l)

2)或将#[[1]] #[1] 1 2 3 4 5 #[[2]] #[1] 6 7 8 9 10 unlist一起使用。也是recursive = FALSE解决方案

base R

3)或使用unlist(l,recursive = FALSE) lapply

base R

4)或使用lapply(l,unlist,recursive = FALSE) (另一个Map

base R

5)或使用Map(c,l) 中的flatten

purrr
,

您也可以使用mapply()

#Code
mapply(c,l)
[[1]]
[1] 1 2 3 4 5

[[2]]
[1]  6  7  8  9 10

或者lapply()

#Code 2
lapply(l,unlist)
[[1]]
[1] 1 2 3 4 5

[[2]]
[1]  6  7  8  9 10

sapply()

#Code 3
sapply(l,c)
[[1]]
[1] 1 2 3 4 5

[[2]]
[1]  6  7  8  9 10

所有base R解决方案。