我试图添加列表作为矩阵的一个元素。我使用以下代码
wiip <- matrix(list(), 5, 5)
for (i in colnames(wave1)) {
for (j in colnames(wave1)) {
wiip[[i,j]] <- gclo(wave1[[i]], wave1[[j]])
}
}
wiip[[i,j]]
表示下标越界。函数gclo的输出是一个列表,我想保存所有的输出。也就是说,双循环创建了i*j(i从1运行到5,j也是如此,因此总共创建了25个列表对象)个数的列表。如何将每个列表保存在一个对象中。
尝试将结果保存在列表中,并使用[, i]
和[,j]
对矩阵的每列进行子集。
wiip <- vector('list', ncol(wave1)*ncol(wave1))
ind <- 0
for (i in colnames(wave1)) {
for (j in colnames(wave1)) {
ind <- ind + 1
wiip[[ind]] <- gclo(wave1[, i], wave1[, j])
}
}