首页 > 解决方案 > 将每个值分配给没有循环的单独列表元素

问题描述

让我们考虑以下数字:

set.seed(42)
x <- sample(100, replace = T)
evens <- x[x%%2 == 0]

我希望将 evens 的每个元素作为列表的单独元素。所以用 for 做这个非常简单:

lst <- list()

for (i in seq_len(length(evens))) lst[[i]] <- evens[i] 

但是我不太确定如何在没有循环的情况下做到这一点。我认为可以使用一些魔法,lapply但我不知道如何使用它。你能帮我一把吗?

标签: rlistloopslapply

解决方案


根据您的描述,您的意思是像下面这样的列表吗?

as.list(evens)

如果你想用lapply,你可以试试

lapply(evens, c)

推荐阅读