如何在R中交换2行之间的多个值

Question

我有一个大小为10x100的矩阵。如何在前30％的列中交换第1行和第2行之间的值？

Answer 1

我们可以反转前两行的行索引以及创建的列索引，方法是使用round编辑30％的总列数来交换行中的值。

colS <- seq(round(ncol(m1)*0.3))
m1[2:1, colS] <- m1[1:2, colS]

数据

m1 <- matrix(1:1000, 10, 100)