要按 R 中的列数划分矩阵行，我们可以按照以下步骤操作 -
首先，创建一个矩阵。
然后，使用 apply 函数将矩阵行除以列数。
让我们创建一个矩阵，如下所示 -
M<-matrix(sample(1:100,40),ncol=2) M
执行时，上述脚本生成以下内容output(this output will vary on your system due to randomization)-
[,1] [,2] [1,] 98 93 [2,] 83 86 [3,] 65 46 [4,] 31 8 [5,] 9 58 [6,] 62 51 [7,] 96 95 [8,] 48 92 [9,] 53 56 [10,] 40 16 [11,] 54 52 [12,] 100 27 [13,] 88 29 [14,] 18 33 [15,] 57 71 [16,] 90 28 [17,] 73 77 [18,] 97 24 [19,] 84 72 [20,] 75 1
使用 apply 函数将 M 的行除以 M 中的列数 -
M<-matrix(sample(1:100,40),ncol=2) M_new<-t(apply(M,1, function(x) x/length(x))) M_new
[,1] [,2] [1,] 49.0 46.5 [2,] 41.5 43.0 [3,] 32.5 23.0 [4,] 15.5 4.0 [5,] 4.5 29.0 [6,] 31.0 25.5 [7,] 48.0 47.5 [8,] 24.0 46.0 [9,] 26.5 28.0 [10,] 20.0 8.0 [11,] 27.0 26.0 [12,] 50.0 13.5 [13,] 44.0 14.5 [14,] 9.0 16.5 [15,] 28.5 35.5 [16,] 45.0 14.0 [17,] 36.5 38.5 [18,] 48.5 12.0 [19,] 42.0 36.0 [20,] 37.5 0.5