Rainer M. Krug wrote:

> Hi
> 
> I have a loop which is doing time consuming calculations and I would 
> like to be able to have some feedback on where it is in it's 
> calculations. I tried to simply show the counter variable in the loop, 
> but id doesn't work as all display seems to be delayed until the loop is 
> completed. Is there any way of displaying the progress of a loop?
> 
> Rainer
> 
> The loop:
> 
> for (i in 2:Result$NoSims)
> {
>       ppp <- runifpoint(Result$NoPlants)
>       K <- Kest(ppp)
>       Result$LSim[i,] <- sqrt(K$iso / pi) - K$r
>       CM <- (Result$LSim[i,] * Result$LSim[i,]) / abs(K$r[2] - K$r[1])
>       Result$SigCM[i] <- sum(CM, na.rm=TRUE)
>       i  #<========================Doesn't display in the loop
> }
> 


- Update your console (I guess you are on Windows?) by using 
flush.console().
- You might want to measure time consumption, hence see ?Rprof.
- Save some more time by moving as much as possible out of your loop by 
doing it in a vectorized way (I don't know all the functions you are 
using, hence cannot make any further recommendations).

Uwe Ligges

______________________________________________
[email protected] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html

Reply via email to