Message-ID: <971536df0902160817w473765c4lb495710cd6f2be29@mail.gmail.com>
Date: 2009-02-16T16:17:46Z
From: Gabor Grothendieck
Subject: controlling number of decimals printed in anova tables?
In-Reply-To: <loom.20090216T160708-53@post.gmane.org>
On Mon, Feb 16, 2009 at 11:08 AM, Dieter Menne
<dieter.menne at menne-biomed.de> wrote:
> Gabor Grothendieck <ggrothendieck <at> gmail.com> writes:
>
>>
>> Or safer:
>>
>> df <- as.integer(round(...))
>>
>
> Did you try? I believe it is a problem of printCoefmat that has quite
> a few options for special column, but none for df. Ask Martin M?chler.
Yes, with as.integer(round(...)) It looks like this:
> modelFit.glm(berk.mod2)
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
> modelFit.glm(berk.mod2)
Analysis of Deviance Table
Formula: Freq ~ Dept * (Gender + Admit)
Deviance df Pr(>Chi^2)
Null model 2650 23
Model 22 6 0.0014 **
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
Also note:
> as.integer(1-.00001)
[1] 0
> as.integer(round(1-.00001))
[1] 1