在R中填充5 * 5矩阵，使用for循环，-1,0和1等比例

Question

我必须使用-1，0和1填充矩阵。我知道如何使用单行命令即matrix(-1:1, nrow = 5, ncol = 5)来完成它，它会得到如下结果：

-1  1  0 -1  1
 0 -1  1  0 -1
 1  0 -1  1  0
-1  1  0 -1  1
 0 -1  1  0 -1

我想通过for循环输出相同的输出。有人能帮我吗？

Answer 1

也许是这样的？

m <- matrix(rep(NA, 25), 5, 5)
m
for(i in seq_along(m)) m[i] <- (-1:1)[i%%3+1]
m