怎么样实现“矩阵中所有大于10的元素，令其等于1” 这个功能

请问R 语言 怎么样实现“矩阵中所有大于10的元素，减1” 这个功能，多谢！


比如
> a<-matrix(1:12,nrow=3,ncol=4)
> a
     [,1] [,2] [,3] [,4]
[1,]    1    4    7   10
[2,]    2    5    8   11
[3,]    3    6    9   12

输出为:

> a
     [,1] [,2] [,3] [,4]
[1,]    1    4    7   9
[2,]    2    5    8   1
[3,]    3    6    9   1

上述只是例子
语句应该怎么写？多谢！

b<-a-(a>=10)