Question

我最近在一些大型，复杂的列表上做了一些工作，我看到一些令人惊讶的行为（至少对我来说），主要是为列表分配名称。一个简单的例子：

Fil <- list(
a = list(A=seq(1, 5, 1), B=rnorm(5), C=runif(5)), 
b = list(A="Cat", B=c("Dog", "Bird"), C=list("Squirrel", "Cheetah", "Lion")),
c = list(A=rep(TRUE, 5), B=rep(FALSE, 5), C=rep(NA, 5)))

filList <- list()

for(i in 1:3){
  filList[i] <- Fil[i]
  names(filList)[i] <- names(Fil[i])
}
identical(Fil,filList)
[1] TRUE

但：

for(i in 1:3){
  filList[i] <- Fil[i]
  names(filList[i]) <- names(Fil[i])
}
identical(Fil,filList)
[1] FALSE

我认为它让我感到困惑的主要原因是因为第一个for循环中第一个names行的左侧形式需要与右侧的左侧形式不同才能工作;我原以为这些应该是一样的。有人可以向我解释一下吗？

Answer 1

第一种情况是正确的用法。在第二种情况下，您将filList[i]发送到names<-，它仅作为临时子集对象存在。

或者，您可以使用以下方法完成循环之外的所有操作：

names(filList) <- names(Fil)

在R中命名列表元素

1 个答案: