Please do read the FAQ: Finally, check carefully whether the bug is with R, or a contributed package. Bug reports on contributed packages should be sent first to the package maintainer, and only submitted to the R-bugs repository by package maintainers, mentioning the package in the subject line.
You are not the maintainer, so this is the wrong place. On Fri, 4 Nov 2005 [EMAIL PROTECTED] wrote: > Full_Name: Grant Izmirlian > Version: 2.2.0 > OS: SuSe Linux version 9.2 > Submission from: (NULL) (156.40.34.177) > > > Sorry about the last submission, my bug-fix had an error in it because ifelse > doesn't vectorize. I'll repost with the correct bug-fix. > ------------------------------------------------------------------------------- > The option exists to include all parameters, including the intercept, in the > L-1 > constraint, by specifying the argument, sweep.out=NULL, explicitly in the > call. However, upon doing this, the function stops with an error report > "Matrix build from transformed variables has a constant column" > > I was able to fix it as follows. In the following line, taken from the same > block of code producing the stop error, modify the existing line from > > X.to.C.stds <- sqrt(apply(X.to.C.w, 2, var)) > > to > > > X.to.C.stds <- (!is.null(sweep.out)) * > c(1,sqrt(apply(X.to.C.w[,-is.null(sweep.out)], 2, var))) + > > (is.null(sweep.out)) * sqrt(apply(X.to.C.w,2,var))) > > That should work. > > ______________________________________________ > R-devel@r-project.org mailing list > https://stat.ethz.ch/mailman/listinfo/r-devel > > -- Brian D. Ripley, [EMAIL PROTECTED] Professor of Applied Statistics, http://www.stats.ox.ac.uk/~ripley/ University of Oxford, Tel: +44 1865 272861 (self) 1 South Parks Road, +44 1865 272866 (PA) Oxford OX1 3TG, UK Fax: +44 1865 272595 ______________________________________________ R-devel@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-devel
