R, поэтому интересно исправить ошибку. У меня есть список матриц X <- list(X1, X2, ... X10) я хочу посчитать матрицу расстояний между объектами условно матрицу R. Для этого я создала цикл, чтобы не считать 100 раз одно и то же руками. Скажите, в чем тут беда? Объекты доставались вот так: X1 <- matrix(data[1:200, 5], nrow = 10, ncol = 20)
                  
                  
                  
                  
                  
                  R <- list(NULL)
                  
                  
                  for (i in X) {
                  
                  
                    for (j in X) {
                  
                  
                      for (r in R) {
                  
                  
                        if (i == j) {
                  
                  
                        R <- cbind(as.matrix(dist(i)))
                  
                  
                        }
                  
                  
                        else {
                  
                  
                        R <- cbind(as.matrix(pdist(i, j)))
                  
                  
                        }
                  
                  
                      }
                  
                  
                    }
                  
                  
                
В данном случае дружить с циклами не нужно, операции с матрицами все векторизированные
Обсуждают сегодня