search for: alphavalue

Displaying 1 result from an estimated 1 matches for "alphavalue".

2003 Nov 24
1
Warning calling par
...postscript(psfile) close.screen(all=T) par(mex=0.73,cex=0.8) split.screen(c(2,2)) tq<-sort(runif(length(data1))) message<-rep("no message",4) for (i in 1:length(nr)){ diffmethod<-paste("du.",nr[i],sep="") title<-paste("Family",nr[i]) alphavalue<-paste("a=",round(alpha[i],digits=3),sep="") screen(i) data3<-sort(eval(call(diffmethod,data1,data2,alpha[i]))) diffdata<-data3[!is.na(data3)] if(length(data3)>length(diffdata)){ message[i]<-paste("Family ",nr[i],"contains NA!") }...