小编lig*_*ang的帖子

I\xc2\xb4m 只是 R 中的新功能，我想为循环创建 n 矩阵。

我做了一个循环来创建 3 个矩阵，但我不知道如何保存它。

n=numeric(0)\n\nfor (i in 1:3){\n  n[i]=5^i\n  m=numeric(0)\n  m=matrix(data=0,nrow=n[i],ncol=n[i])\n\n  for (j in n[i]:1){\n    for (k in 1:i){\n     m[j,k]=j+k\n    }\n  }\n}\n

有人可以帮忙吗？

谢谢

我是使用apply/purrr函数的新手.我不知道何时以及如何使用此功能.我有矩阵的双循环,我想避免它们.有一种方法可以做到吗？我必须做这个操作(见下面的代码)

NCols=4
NRows=4

set.seed(1234)
myMat<-matrix(runif(NCols*NRows), ncol=NCols)
myMat

norm=matrix(0,NRows,NCols)

 for (i in 1:nrow(myMat)){
    for (j in 1:nrow(myMat)){
      norm[i,j] <- sum((myMat[i,]-myMat[j,])^2)
    }
  }

谢谢

对@markus使用dist函数它是更快的方法.