矩阵只有数字值,有时这些值输入不正确,或者我们可能要根据某些条件替换矩阵中的某些值。例如,如果矩阵中只有很少的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