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.
