search for: nnoise

...neighbour distances (x and y) will be computed. The code below is my feeble attempt to do the simulation. So far as I know, it doesn't work. Any help appreciated! (I am using Mac version of R) Bill Simpson # nearest neighbour distance simulation # for dynamic noise dots do.sim<-function(nnoise, nsignal, jump) { ntotal<-nsignal+nnoise x<<-NULL y<<-NULL x.temp<-0 y.temp<-0 #generate noise dots nx1<-runif(nnoise,0,4095) nx2<-runif(nnoise,0,4095) ny1<-runif(nnoise,0,4095) ny2<-runif(nnoise,0,4095) #generate signal dots sx1<-runif(nsignal,0,4095) sx2<-...

...9;t like it, but maybe it is the way it is supposed to be. I would prefer for it to stay numeric(0). I notice also > ceiling(runif(0,0,4095)) numeric(0) > floor(runif(0,0,4095)) numeric(0) which leads me to thing round() is not working right. I have some code like this: do.sim<-function(nnoise, nsignal, jump) { ntotal<-nsignal+nnoise x<-numeric(ntotal) y<-numeric(ntotal) #generate noise dots nx1<-round(runif(nnoise,0,4095)) nx2<-round(runif(nnoise,0,4095)) ny1<-round(runif(nnoise,0,4095)) ny2<-round(runif(nnoise,0,4095)) #generate signal dots sx1<-round(runif(ns...

...ng with "interaction" in 2x2 table, and am using Edwards's G_I (Likelihood, p. 194). I label the cells in the table as follows stim response "y" "n" total -------------------------------- y hit miss nsignal -------------------------------- n false correct nnoise alarm rejection --------------------------------- Gsens<-function(nhit,nmiss,nfa,ncr) { # Edwards's G_I, measure of interaction, is measure of sensitivity (xlogx(nhit)+xlogx(nmiss)+xlogx(nfa)+xlogx(ncr))-(xlogx(nhit+nmiss)+xlogx(nfa+ncr))-(xlogx(nhit+nfa)+xlogx(nmiss+ncr))+xlogx(nhit+nmis...