在循环部分填充的相关矩阵(事先已经过滤)时,我想比较循环中两个变量的方差,并保持变量在向量中具有最高的方差。
这是相关矩阵的捕获:
已经在单独的数据帧(var)中计算了方差,并且方差的顺序与相关矩阵中的变量的顺序一致。
不起作用的代码片段如下:
vec <- c()
for (i in ncol(mcor)) {
for (j in nrow(mcor)) {
if (is.na(mcor[i,j])) {
j = j+1
} else {
if (var[j,2] > var[i,2]) {
vec <- c(vec, var[j,2])
} else {
vec <- c(vec, var[i,2])
}
}
}
}
您的循环未正确定义。尝试
for (i in 1:ncol(mcor)) {
for (j in 1:nrow(mcor)) {
...