如何将矩阵的所有列附加到一个？

Question

我想将矩阵的所有列附加到一列中。

模拟示例

# Sample data
testmat <- matrix (data = seq(1:3), nrow = 3, ncol = 3)

> testmat
     [,1] [,2] [,3]
[1,]    1    1    1
[2,]    2    2    2
[3,]    3    3    3

我期待

     [,1]
[1,]    1 
[2,]    2 
[3,]    3
[4,]    1
[5,]    2
[6,]    3
[7,]    1
[8,]    2
[9,]    3

我的第一个猜测是：

onecol <- as.matrix (apply (X = testmat, MARGIN = 2, FUN = cat))

但它没有返回任何有用的东西。

任何帮助？

Answer 1

我们不需要在此使用apply。 matrix是具有vector属性的dim，因此，如果我们再次在原始matrix上调用matrix并指定ncol，那么会将其更改为matrix，其中包含1列

matrix(testmat, ncol=1) 

或者我们可以更改原始dim的{​​{1}}（＆＃39; testmat＆＃39;）

matrix