将元素添加到R中for循环的列表中

Question

我正在尝试将元素添加到for循环中的列表中.如何设置字段名称？

L<-list() 
    for(i in 1:N)
    {
        #Create object Ps...
        string<-paste("element",i,sep="")
        L$get(string)<-Ps
    }

我希望列表中的每个元素都具有依赖于i的字段名称(例如,第二个元素应该具有"element2")

这该怎么做？我认为我的错误是使用get

Answer 1

看起来你正在寻找如下构造:

N <- 3
x <- list()
for(i in 1:N) {
    Ps <- i  ## where i is whatever your Ps is
    x[[paste0("element", i)]] <- Ps
}
x
# $element1
# [1] 1
#
# $element2
# [1] 2
#
# $element3
# [1] 3

虽然,如果您N事先知道,那么分配x然后填充它而不是添加到现有列表更好的做法和更有效.

N <- 3
x <- vector("list", N)
for(i in 1:N) {
    Ps <- i  ## where i is whatever your Ps is
    x[[i]] <- Ps
}
setNames(x, paste0("element", 1:N))
# $element1
# [1] 1
#
# $element2
# [1] 2
#
# $element3
# [1] 3