在向量上运行循环

Question

我有一组数据矩阵，我从中检索特征值如下：

all_eigen <- sapply(all_matrices,eigen,only.values=FALSE)

这样

head(all_eigen[[1]]$values)
[1] 4160.357 4061.777 3865.349 3853.142 3838.621 3829.705

那里没有问题。但是，当我尝试将每组特征值转换为后续分析时，如下所示：

for(i in 1:length(all_eigen)){
abs(all_eigen[[i]]$values) -> x[[i]]
length(x[[i]] -> n[[i]]
seq(from = min(x[[i]]) - 1,
        to = max(x[[i]]) +1, by = 0.01) -> eigenGrid[[i]]
}

我收到以下两条错误消息之一：

Error in x[[i]] <- abs(all_eigen[[i]]$values) : 
  more elements supplied than there are to replace

或

Error in x[[i]] <- abs(all_eigen[[i]]$values) : object 'x' not found

这应该是一项相对简单的任务，但我不确定我缺少什么。 （相反，如果我一次转换一个 - x1＆lt; - abs（all_eigen [[1]] $ values） - 那么没有问题。）任何建议都将受到赞赏。

提前致谢。