Hi, Why do I get error msg by calling superpc.plotcv (see below)? I use superpc v. 1.0.4 and R 2.2.1
thanks Haleh ------------------------------------------------------------------ > set.seed(332) > x<-matrix(rnorm(1000*40),ncol=40) > y<-10+svd(x[1:60,])$v[,1]+ .1*rnorm(40) > censoring.status<- sample(c(rep(1,30),rep(0,10))) > featurenames <- paste("feature",as.character(1:1000),sep="") > > data<-list(x=x,y=y, censoring.status=censoring.status, > featurenames=featurenames) > library (superpc) > a<- superpc.train(data, type="survival") > aa<-superpc.cv(a,data) fold= 1 11Loading required package: survival Loading required package: splines 23212331234123512361237123812391231012311123121231312314123151231612317123181231912320123 fold= 2 1123212331234123512361237123812391231012311123121231312314123151231612317123181231912320123 fold= 3 1123212331234123512361237123812391231012311123121231312314123151231612317123181231912320123 fold= 4 1123212331234123512361237123812391231012311123121231312314123151231612317123181231912320123 fold= 5 112321233123412351236123712381239123101231112312123131231412315123161231712318123191232012 fold= 6 1123212331234123512361237123812391231012311123121231312314123151231612317123181231912320123 > superpc.plotcv(aa) Error in qchisq(p, df, lower.tail, log.p) : Non-numeric argument to mathematical function In addition: Warning message: is.na() applied to non-(list or vector) in: is.na(object$scor.upper) > --------------------------------- Sponsored Link Mortgage rates near 39yr lows. $420,000 Mortgage for $1,399/mo - Calculate new house payment [[alternative HTML version deleted]] ______________________________________________ R-help@stat.math.ethz.ch mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.