R-alpha: contr.helmert: bug (??) don't have the SAME problem

[Martin Maechler]

[I diverged to  R-devel]

Peter, I cannot reproduce your bug
I can type

	solve(cbind(c(1,1,1,1),contr.helmert(4)))

many times, and never get an error.
Also,

 for(n in 2:7) { 
  A <- cbind(rep(1,n), contr.helmert(n)); print(A); print(solve(A),digits=4)}

is just fine.

But then I do

> version
$platform
[1] "sparc-sun-solaris2.5"

$arch
[1] "sparc"

$os
[1] "solaris2.5"

$system
[1] "sparc, solaris2.5"

$status
[1] "Beta"

$status.rev
[1] "0"

$major
[1] "0"

$minor
[1] "49"

$year
[1] "1997"

$language
[1] "R"


Process R segmentation violation at Wed May  7 14:22:57 1997
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

And this seems reproducible now.
Also under SunOS4 gcc (above was Solaris, Sun's cc).

Martin
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-devel-request@stat.math.ethz.ch
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-