It looks like you want results[[1]]$Df[5] # residual df results[[1]]$`Mean Sq`[5]
Untested without a reproducible example. Dennis On Sat, Aug 6, 2011 at 3:00 AM, Roberto <rmosce...@unitus.it> wrote: > Hi, > this is my script > >> anova <- aov(data ~ Ts*Te*t + Error(R/Ts*Te*t)) >> results <- summary(anova$Within) > > this is results > > Df Sum Sq Mean Sq F value Pr(>F) > Ts 2 1232.2 616.11 53.606 3.965e-10 *** > Ts:Te 4 4889.5 1222.37 106.356 4.075e-16 *** > Ts:t 4 6472.1 1618.01 140.780 < 2.2e-16 *** > Ts:Te:t 8 4181.0 522.63 45.473 1.088e-13 *** > Residuals 27 310.3 11.49 > --- > Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1 > > I need to extract "Residuals DF" and "Residuals MeanSq" from results > >> str(results) > > List of 1 > $ :Classes ‘anova’ and 'data.frame': 5 obs. of 5 variables: > ..$ Df : num [1:5] 2 4 4 8 27 > ..$ Sum Sq : num [1:5] 1232 4889 6472 4181 310 > ..$ Mean Sq: num [1:5] 616.1 1222.4 1618 522.6 11.5 > ..$ F value: num [1:5] 53.6 106.4 140.8 45.5 NA > ..$ Pr(>F) : num [1:5] 3.96e-10 4.07e-16 1.14e-17 1.09e-13 NA > - attr(*, "class")= chr [1:2] "summary.aov" "listof" > > I try to use results$Df or similar, but nothing seem to work > > Thanks in advance > > -- > View this message in context: > http://r.789695.n4.nabble.com/Problems-to-extract-data-from-anova-table-tp3723125p3723125.html > Sent from the R help mailing list archive at Nabble.com. > > ______________________________________________ > R-help@r-project.org mailing list > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide http://www.R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. > ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
