search for: randomrecall

...t((1-rand)*(cmruci-cmrlci)*(cmruci-cmr)) ### 7 rounding y to 1 sign digit and then multiplying by ten so as to get a whole number per 100,000 per day (easier for array) y<-round(y,digits=1)*10 ### 8 Generating random time or x coordinate ### 9 First generating random time within recall period randomrecall<-round(runif(n=1,min=recallmin,max=recallmax)) ### 10 Second generating random time of displacement (this todrange<-todmax-todmin proprand<-runif(n=1,min=0,max=1) randomtod<-0 for(i in 1:todrange){ if (proprand>data[[9+i]] & proprand<=data[[10+i]]) randomtod=i } ### 11 Thus...

...erate study that the function should run through. Desired outcome are [x,y] and a weight for that coordinate. I have problems with generating x. ## Generating random time or x coordinate (through random time of displacement - random recall) ## First generating random time within recall period randomrecall<-round(runif(n=1,min=recallmin,max=recallmax)) ## Second generating random time of displacement todrange<-todmax-todminrandomtod<-0for(i in 1:todrange){if (proprand>data[[9+i]] & proprand<=data[[10+i]]) randomtod=i} Following messages are given: Warning messages:1: In 1:tod...