Displaying 1 result from an estimated 1 matches for "shot2mean".
2009 Jun 04
1
hist returning density larger than 1
...t;~/Research/MR Distribution Analysis/"
setwd(dir)
getwd()
# Define Objects
Max.Shots=3
Max.Groups=5000
hist.brks <- pretty(range(c(0,4)), 200)
for(sim in (2:Max.Shots)){
x.Data<-matrix(nrow=Max.Groups,ncol=sim,byrow=TRUE)
y.Data<-matrix(nrow=Max.Groups,ncol=sim,byrow=TRUE)
shot2mean.x<-matrix(nrow=Max.Groups,ncol=sim,byrow=TRUE)
shot2mean.y<-matrix(nrow=Max.Groups,ncol=sim,byrow=TRUE)
Euclid.Dist<-matrix(nrow=Max.Groups,ncol=sim,byrow=TRUE)
mean.radius<-vector(mode="numeric",length=Max.Groups)
# Generate the Simulation Data
################...