在R中使用嵌套的for循环可能会使代码难以理解、执行耗时并且运行慢。为了解决这个问题,可以使用lapply、sapply等函数来替代嵌套的for循环。
下面的例子演示了如何使用lapply函数将嵌套的for循环转换为矢量化的操作:
for(i in 1:nrow(data)){ for(j in 1:ncol(data)){ data[i,j] <- data[i,j] * 2 } }
data <- matrix(1:9, nrow = 3) data <- t(lapply(data, function(x) x*2))