如何在 R 中根据列数对矩阵行进行除法?
要在 R 中根据列数对矩阵行进行除法,我们可以按照以下步骤进行操作:
- 首先,创建一个矩阵。
- 然后,使用 apply 函数根据列数对矩阵行进行除法。
创建矩阵
我们创建一个矩阵,如下所示:
M<-matrix(sample(1:100,40),ncol=2) M
执行时,上述脚本将生成以下输出(此输出会因随机性而因系统而异):
[,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
广告