我有一个数据框列表,其中包含一些时间序列预测的结果,每个数据框都有一个名称:
list.of.results <- list(modelA, modelB, modelC)
现在,我遍历该列表并对每个模型的结果进行一些测试,但是我需要将数据帧的名称提取为当前正在遍历的字符串。
这使我为空:
names(list.of.results)
> NULL
任何想法如何做到这一点?谢谢
换个问题,目标是创建一个列表,其中列表元素的名称与已分配给它们的对象的名称相同。如果a
将分配给第一个列表元素,则名字将自动变为a
。
这可以通过使用makeNamedList
代替来实现list
。这个问题的作用makeNamedList
是一个浓缩的结果。
makeNamedList <- function(...) {
structure(list(...), names = as.list(substitute(list(...)))[-1L])
}
例子:
mylist <- makeNamedList(cars, iris)
str(mylist)
# List of 2
# $ cars:'data.frame': 50 obs. of 2 variables:
# ..$ speed: num [1:50] 4 4 7 7 8 9 10 10 10 11 ...
# ..$ dist : num [1:50] 2 10 4 22 16 10 18 26 34 17 ...
# $ iris:'data.frame': 150 obs. of 5 variables:
# ..$ Sepal.Length: num [1:150] 5.1 4.9 4.7 4.6 5 5.4 4.6 5 4.4 4.9 ...
# ..$ Sepal.Width : num [1:150] 3.5 3 3.2 3.1 3.6 3.9 3.4 3.4 2.9 3.1 ...
# ..$ Petal.Length: num [1:150] 1.4 1.4 1.3 1.5 1.4 1.7 1.4 1.5 1.4 1.5 ...
# ..$ Petal.Width : num [1:150] 0.2 0.2 0.2 0.2 0.2 0.4 0.3 0.2 0.2 0.1 ...
# ..$ Species : Factor w/ 3 levels "setosa","versicolor",..: 1 1 1 1 1 1 1 1 1 1 ...
因此makeNamedList(cars, iris)
等效于list(cars = cars, iris = iris)
。
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句