Skip to content

Error strata in aov (PR#1315)

1 message · Brian Ripley

#
On Sun, 17 Feb 2002 jzacks@artsci.wustl.edu wrote:

            
The problem is the length of your Error formula.  In aov there is a
line:

eTerm <- deparse(errorterm[[2]])

change it to

eTerm <- deparse(errorterm[[2]], width = 500)

and later

lmcall$formula <- form <- update(formula, paste(". ~ .-",
deparse(errorterm)))

needs to be deparse(errorterm, width=500)

and then correct the formula you gave (there is no withn3, so this cannot
have worked in S-PLUS).

With those corrections I get the same answers as S-PLUS 6.0.