如何在R中根據條件用另一個值替換矩陣中的值?
矩陣只包含數值,有時這些值輸入錯誤,或者我們可能需要根據某些條件替換矩陣中的某些值。例如,如果矩陣中有一些5,我們可能希望將所有5替換為大於5或小於5的另一個數字。
示例
考慮下面的矩陣:
set.seed(123) M <-matrix(sample(1:50,25),nrow=5) M
輸出
[,1] [,2] [,3] [,4] [,5] [1,] 31 43 27 29 36 [2,] 15 37 5 8 19 [3,] 14 48 40 41 4 [4,] 3 25 28 7 45 [5,] 42 26 9 10 17
基於不同條件替換值:
示例
M[M <5]<-10 M
輸出
[,1] [,2] [,3] [,4] [,5] [1,] 31 43 27 29 36 [2,] 15 37 5 8 19 [3,] 14 48 40 41 10 [4,] 10 25 28 7 45 [5,] 42 26 9 10 17
示例
M[M=5] <-15 M
輸出
[,1] [,2] [,3] [,4] [,5] [1,] 31 43 27 29 36 [2,] 15 37 5 8 19 [3,] 14 48 40 41 10 [4,] 10 25 28 7 45 [5,] 15 26 9 10 17
漂亮列印
M[M==5] <-15 M
輸出
[,1] [,2] [,3] [,4] [,5] [1,] 31 43 27 29 36 [2,] 15 37 15 8 19 [3,] 14 48 40 41 10 [4,] 10 25 28 7 45 [5,] 15 26 9 10 17
示例
M[M<10&M>5]<-21 M
輸出
[,1] [,2] [,3] [,4] [,5] [1,] 31 43 27 29 36 [2,] 15 37 15 21 19 [3,] 14 48 40 41 10 [4,] 10 25 28 21 45 [5,] 15 26 21 10 17
示例
M[M >30]<-25 M
輸出
[,1] [,2] [,3] [,4] [,5] [1,] 25 25 27 29 25 [2,] 15 25 15 21 19 [3,] 14 25 25 25 10 [4,] 10 25 28 21 25 [5,] 15 26 21 10 17
示例
M[M==14] <-25 M
輸出
[,1] [,2] [,3] [,4] [,5] [1,] 25 25 27 29 25 [2,] 15 25 15 21 19 [3,] 25 25 25 25 10 [4,] 10 25 28 21 25 [5,] 15 26 21 10 17
示例
M[M==17] <-15 M
輸出
[,1] [,2] [,3] [,4] [,5] [1,] 25 25 27 29 25 [2,] 15 25 15 21 19 [3,] 25 25 25 25 10 [4,] 10 25 28 21 25 [5,] 15 26 21 10 15
示例
M[M>25&M <30]<-25 M
輸出
[,1] [,2] [,3] [,4] [,5] [1,] 25 25 25 25 25 [2,] 15 25 15 21 19 [3,] 25 25 25 25 10 [4,] 10 25 25 21 25 [5,] 15 25 21 10 15
廣告