矩阵乘以特定数量

Question

我需要创建100x100矩阵，然后将大于5000的每条记录乘以2，然后我放弃：/

矩阵代码 m <- matrix(1:10000, nrow = 100, ncol = 100)

有人可以帮我吗？

Answer 1

我认为这段代码可以解决您的问题：

m[m > 5000] = 2*m[m>5000]

也：

m = ifelse(m > 5000, 2*m, m)

Answer 2

n <- apply(m, 2, function(x) ifelse(x > 5000, x*2, x))