search for: nosims

...ve 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 } -- Rainer M...

Hi I have the following loop and would like to vectorize it. Any ideas if it is possible? Thanks, Rainer Tha 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) print(i) flush.console() } -- NEW TELEPHONE NUMBER Tel: +27 - (0)72...

...<- y.dwt for (i in 1:(length(y.dwt)-1)) { resample.dwt[[i]] <- sample(y.dwt[[i]]*infl, replace = TRUE) } idwt(resample.dwt) } #The simulation: arcoeff<-.9 #AR(1) Coefficient T<-128 #Realization Length bsreps<-300 #Number of Bootstrap Replicates used for test nosims<-20 #Number of Simulations wspval<-rep(0,nosims) #initialize vector of p-values #outer loop for recording calculated p-values for (j in 1:nosims){ series<-arima.sim(T, model=list(ar=arcoeff)) #series would be the observed AR(1) series test<-mos(series,1:length(series)) #observed valu...

--==>> OFFICE WATCH <<==-- The Microsoft Office newsletter from Woody's Watch. Your independent source for MS Office advice and news since 1996 4 March 2005 Vol 10 No 8 New! "The Desktop Search Handbook" - http://shop.woodyswatch.com/dsh/ Advertise in Woody's Watch - great rates, great reach, no hard sell. Ask Jan ow.ads@woodyswatch.com 1.