Differences

This shows you the differences between two versions of the page.

--- c:ms:2023:w07_anova_note [2023/06/04 12:33] – [Post hoc test] hkimscil
+++ c:ms:2023:w07_anova_note [2023/06/04 12:38] (current) – [Post hoc test] hkimscil
@@ Line 440: / Line 440: @@
 mse <- 50
 # 혹은 fansy way from comb3 data.frame
-mse.check <- sum(tapply(comb3$values, comb3$group, var)*9)
+# 15 는 각 그룹의 df
-mse.check
+sse.ch <- sum(tapply(comb3$values, comb3$group, var)*15)
+sse.ch
+mse.ch <- sse.ch/45
+mse.ch
 se <- sqrt(mse/length(A))