如何有效地在 R 中生成所需的矩阵？答案

【问题标题】：How to efficiently produce a desired matrix in R?如何有效地在 R 中生成所需的矩阵？
【发布时间】：2017-06-27 18:57:34
【问题描述】：

我试图在 R 中生成以下 7 x 4 矩阵：

m = matrix(c(seq(25, 1, by = -4), 
             seq(26, 2, by = -4), 
             seq(27, 3, by = -4), 
             seq(28, 4, by = -4)), nrow = 7, ncol = 4)

但是，我想知道是否可以使用比我上面使用的更高效的 R 代码来实现相同的矩阵？

【问题讨论】：

matrix(1:28, 7, 4, TRUE)[7:1,]

标签： r function matrix

【解决方案1】：

这里有一个解决方案：

m <- matrix(rev(c(1:28)),nrow=7,ncol=4,byrow = TRUE)[,rev(1:4)]

而且这个更快：

m <- matrix(28:1,nrow=7,ncol=4,byrow = TRUE)[,4:1]

【讨论】：

【解决方案2】：

m = matrix(c(rep(seq(25, 1, by = -4),4) + rep(c(0:3),each=7) ), nrow = 7, ncol = 4)

不确定你是否会称之为更高效...

【讨论】：