Differences

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

--- r:oneway_anova [2020/10/12 16:34] – hkimscil
+++ r:oneway_anova [2020/10/12 16:36] – hkimscil
@@ Line 324: / Line 324: @@
 > </code>
-<code>> tapply(xs$values, xs$ind, mean)
-   x1    x2    x3
-.46 46.94 46.35 </code>
-SS<sub>between</sub>
-<code>> meanxs <- mean(xs$values)
-> mx1 <- mean(x1)
-> mx2 <- mean(x2)
-> mx3 <- mean(x3)
-> x2ss <- 10*((meanxs - mx2)^2)
-> x3ss <- 10*((meanxs - mx3)^2)
-> x1ss <- 10*((meanxs - mx1)^2)
-> xss <- x1ss+x2ss+x3ss
-> xss
-[1] 156.302
-</code>
 ====== E.g. 1 ======