用R中的Lapply族替换双嵌套的for循环

Question

我目前正在使用双（嵌套）CDMA循环来实现以下公式：。

一切正常。但是我想知道是否可以：

（A）在这种情况下，将for输入为单个数字r而不是.3和.3的矩阵？

（B）使用1系列代码，例如lapply而不是嵌套的mapply循环？

for

Answer 1

您的尝试的简短版本是

root
  dist (compiled by tsc)
  node_modules
  src
    database
      models
      connection.ts (Sequelize connection)
    server
      app.ts
      server.ts (Express server)
  nodemon.json
  tsconfig.json
  package.json

(1/m)^2 * sum(sqrt(outer(V, V)) * r) #[1] 0.2599292 将每个元素与每个其他元素相乘，这就是double循环的作用。然后，我们取所有值的outer，乘以sqrt矩阵，r，再乘以sum。

---

我们想将对角元素乘以1，将其余元素与(1/m)^2值相乘，这在r是矩阵时很容易，但是，如果它是单个数字，则需要相应地构造矩阵。

r