让我们假设我想对向量执行此操作:
TEST.1 <- runif(10000, min = 0, max = 10000) # Whatever, doesn't mind
TEST.2 <- array(0, dim = 10000) # To save the results
for(i in 1:10000) TEST.2[i] <- TEST.1[i]/i
重点在于对每个元素执行的操作涉及到数组元素的索引或位置。
我可以以某种方式矢量化这样的操作吗?
你可以这样做
测试.2 <- as.array(TEST.1/1:10000)