n<-100000
aa<-rnorm(n)
bb<-rnorm(n)
system.time(lapply(aa, function(z){mean(bb<pnorm(z))}))
运行这个小代码需要很长时间.简单地说,我有两个向量aa和bb.对于每个元素aa,比方说aa[i],我想要的比例bb < aa[i]
我找到了这篇文章并尝试用它来加速.但它不起作用. sapply与复合函数的速度比较
任何帮助将不胜感激!