我需要创建矩阵100x100,然后将大于5000的每条记录乘以2,然后我放弃:/
矩阵代码m <- matrix(1:10000, nrow = 100, ncol = 100)
m <- matrix(1:10000, nrow = 100, ncol = 100)
有人可以帮我吗?
我认为这段代码解决了您的问题:
m[m > 5000] = 2*m[m>5000]
也:
m = ifelse(m > 5000, 2*m, m)
n <- apply(m, 2, function(x) ifelse(x > 5000, x*2, x))