From nested loop to mclapply
Try help("expand.grid", package="base") for one way to create the
combinations of (i,j) outside the loop, or perhaps vignette("nested",
package="foreach") which does it "automatically" (rather: naturally).
Allan
On 18/04/11 16:53, Alaios wrote:
Dear all,
I am trying to find a decent way to speed up my code.
So far I have used mclapply with really good results (parallel version of lapply). I have a nested loop that I would like to help me convert it to lapply
for (i in seq(from=-1,to=1-2/ncol(sr),length=ncol(sr))){
for (j in seq(from=-1,to=1-2/nrow(sr),length=nrow(sr))){
estimatedsr[findCoord(c(i,j),sr)[1],findCoord(c(i,j),sr)[2] ]<-fxy(c(i,j))
}
So far I have converted some one-depth for loops to lapply but I am not sure If I can use lapply to convert a nested loop to something simpler.
Best Regards
Alex
______________________________________________ R-help at r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.