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@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.

______________________________________________
R-help@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.

Reply via email to