PooledANOVA: Pooling nonsignificant interactions to Residuals

In EMSaov: The Analysis of Variance with EMS

Description

Pooling nonsignificant interactions to Residuals

Usage

PooledANOVA(SS.table,del.ID)

Arguments

SS.table	result from EMSanova
del.ID	id's to combine sum of squares. Use rownames of SS.table

Examples

data(film)
anova.result<-EMSanova(thickness~Gate*Operator*Day,data=film,
                        type=c("F","R","R"))
anova.result 
del.ID<-c("Gate:Day","Residuals")
PooledANOVA(anova.result,del.ID)

Example output

                  Df          SS          MS  Fvalue Pvalue Sig
Gate               2 1.573172222 0.786586111                   
Operator           2 0.112072222 0.056036111 18.7656 0.0506   .
Gate:Operator      4 0.042844444 0.010711111  4.3229 0.0926   .
Day                1 0.001002778 0.001002778  0.3358 0.6208    
Gate:Day           2 0.011338889 0.005669444  2.2881 0.2175    
Operator:Day       2 0.005972222 0.002986111   9.188 0.0018  **
Gate:Operator:Day  4 0.009911111 0.002477778  7.6239  9e-04 ***
Residuals         18 0.005850000 0.000325000                   
                                                                       EMS
Gate              Error+2Gate:Operator:Day+6Gate:Day+4Gate:Operator+12Gate
Operator                                    Error+6Operator:Day+12Operator
Gate:Operator                      Error+2Gate:Operator:Day+4Gate:Operator
Day                                              Error+6Operator:Day+18Day
Gate:Day                                Error+2Gate:Operator:Day+6Gate:Day
Operator:Day                                           Error+6Operator:Day
Gate:Operator:Day                                 Error+2Gate:Operator:Day
Residuals                                                            Error
                  Df     SS     MS  Fvalue Pvalue Sig
Gate               2 1.5732 0.7866 73.4365  7e-04 ***
Operator           2 0.1121 0.0560 18.7656 0.0506   .
Gate:Operator      4 0.0428 0.0107  4.3229 0.0926   .
Day                1 0.0010 0.0010  0.3358 0.6208    
Operator:Day       2 0.0060 0.0030  3.4745 0.0507   .
Gate:Operator:Day  4 0.0099 0.0025   2.883 0.0491   *
Residuals         20 0.0172 0.0009                   
                                                             EMS
Gate              Error+2Gate:Operator:Day+4Gate:Operator+12Gate
Operator                          Error+6Operator:Day+12Operator
Gate:Operator            Error+2Gate:Operator:Day+4Gate:Operator
Day                                    Error+6Operator:Day+18Day
Operator:Day                                 Error+6Operator:Day
Gate:Operator:Day                       Error+2Gate:Operator:Day
Residuals                                                  Error

EMSaov documentation built on May 2, 2019, 8:31 a.m.