如何在 R 中按照行方差劃分矩陣值?


為了在 R 中按照行方差劃分矩陣行值,我們可以按照以下步驟操作 −

  • 首先,建立一個矩陣。
  • 然後,使用 apply 函式按照行方差劃分矩陣行值。

建立矩陣

我們建立如下所示的矩陣 −

 線上演示

M<-matrix(sample(1:20,75,replace=TRUE),ncol=3)
M

執行上述指令碼,會生成以下輸出(此輸出會因系統隨機性而有所不同) −

     [,1] [,2] [,3]
[1,]  13   2    15
[2,]  18   16    6
[3,]  10   18   12
[4,]  19   5    19
[5,]  12   13   2
[6,]  11   8    7
[7,]  3   18    7
[8,]  5   17    12
[9,]  7   17    14
[10,] 4   18    2
[11,] 15  2     5
[12,] 1   14    9
[13,] 4   19    2
[14,] 16  13    5
[15,] 15  15   19
[16,] 12  1     2
[17,] 10  16    5
[18,] 6   4    19
[19,] 17  12   15
[20,] 6   9     9
[21,] 13  2    18
[22,] 15  1    15
[23,] 1   14    9
[24,] 7   4     8
[25,] 16  1    17

按照行方差劃分矩陣行值

使用 apply 函式按照行方差劃分 M 的行值 −

 線上演示

M<-matrix(sample(1:20,75,replace=TRUE),ncol=3)
M_new<-t(apply(M,1, function(x) x/var(x)))
M_new

輸出

         [,1]       [,2]       [,3]
[1,] 0.26530612 0.04081633 0.30612245
[2,] 0.43548387 0.38709677 0.14516129
[3,] 0.57692308 1.03846154 0.69230769
[4,] 0.29081633 0.07653061 0.29081633
[5,] 0.32432432 0.35135135 0.05405405
[6,] 2.53846154 1.84615385 1.61538462
[7,] 0.04972376 0.29834254 0.11602210
[8,] 0.13761468 0.46788991 0.33027523
[9,] 0.26582278 0.64556962 0.53164557
[10,] 0.05263158 0.23684211 0.02631579
[11,] 0.32374101 0.04316547 0.10791367
[12,] 0.02325581 0.32558140 0.20930233
[13,] 0.04633205 0.22007722 0.02316602
[14,] 0.49484536 0.40206186 0.15463918
[15,] 2.81250000 2.81250000 3.56250000
[16,] 0.32432432 0.02702703 0.05405405
[17,] 0.32967033 0.52747253 0.16483516
[18,] 0.09045226 0.06030151 0.28643216
[19,] 2.68421053 1.89473684 2.36842105
[20,] 2.00000000 3.00000000 3.00000000
[21,] 0.19402985 0.02985075 0.26865672
[22,] 0.22959184 0.01530612 0.22959184
[23,] 0.02325581 0.32558140 0.20930233
[24,] 1.61538462 0.92307692 1.84615385
[25,] 0.19917012 0.01244813 0.21161826

更新於: 2021 年 8 月 14 日

113 次瀏覽

開啟您的職業生涯

完成課程以獲得認證

開始學習
廣告