r:anova
Differences
This shows you the differences between two versions of the page.
Both sides previous revisionPrevious revisionNext revision | Previous revision | ||
r:anova [2024/04/17 08:28] – [ANOVA in R: Output] hkimscil | r:anova [2024/04/17 08:30] (current) – [ANOVA in R: Output] hkimscil | ||
---|---|---|---|
Line 377: | Line 377: | ||
< | < | ||
+ | > # 위에서 | ||
+ | > # ssd라는 function을 만들면 | ||
+ | > | ||
+ | > ssd <- function(x) { | ||
+ | + | ||
+ | > ss.a1 <- ssd(A) | ||
+ | > ss.b1 <- ssd(B) | ||
+ | > ss.c1 <- ssd(C) | ||
+ | > | ||
+ | > ss.a == ss.a1 | ||
+ | [1] TRUE | ||
+ | > ss.b == ss.b1 | ||
+ | [1] TRUE | ||
+ | > ss.c == ss.c1 | ||
+ | [1] TRUE | ||
+ | > | ||
</ | </ | ||
< | < | ||
+ | > # 그러나 정확히 어떤 그룹에서 차이가 나는지는 판단해주지 않음 | ||
+ | > pairwise.t.test(comb3$values, | ||
+ | |||
+ | Pairwise comparisons using t tests with pooled SD | ||
+ | |||
+ | data: comb3$values and comb3$group | ||
+ | |||
+ | a b | ||
+ | b 0.4279 - | ||
+ | c 0.0075 0.0516 | ||
+ | |||
+ | P value adjustment method: none | ||
+ | > # OR | ||
+ | > pairwise.t.test(comb3$values, | ||
+ | |||
+ | Pairwise comparisons using t tests with pooled SD | ||
+ | |||
+ | data: comb3$values and comb3$group | ||
+ | |||
+ | a | ||
+ | b 1.000 - | ||
+ | c 0.023 0.155 | ||
+ | |||
+ | P value adjustment method: bonferroni | ||
+ | > pairwise.t.test(comb3$values, | ||
+ | |||
+ | Pairwise comparisons using t tests with pooled SD | ||
+ | |||
+ | data: comb3$values and comb3$group | ||
+ | |||
+ | a | ||
+ | b 0.428 - | ||
+ | c 0.023 0.103 | ||
+ | |||
+ | P value adjustment method: holm | ||
+ | > | ||
+ | > # OR TukeyHSD(anova.output) | ||
+ | > TukeyHSD(a.res) | ||
+ | Tukey multiple comparisons of means | ||
+ | 95% family-wise confidence level | ||
+ | |||
+ | Fit: aov(formula = values ~ group, data = comb3) | ||
+ | |||
+ | $group | ||
+ | diff lwr | ||
+ | b-a | ||
+ | c-a -7 -13.059034 -0.940966 0.0201250 | ||
+ | c-b -5 -11.059034 | ||
+ | |||
+ | > | ||
</ | </ | ||
====== Post hoc test ====== | ====== Post hoc test ====== |
r/anova.1713310100.txt.gz · Last modified: 2024/04/17 08:28 by hkimscil