Differences

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

--- c:ms:2025:schedule:week06_t-test_and_anova_note [2025/04/10 04:47] – [t-test, different approach] hkimscil
+++ c:ms:2025:schedule:week06_t-test_and_anova_note [2025/04/13 23:35] (current) – [t-test, different approach] hkimscil
@@ Line 462: / Line 462: @@
 abline(v = mean.a, lty=2, lwd=3, col="blue")
 abline(v = mean.b, lty=2, lwd=3, col="darkgreen")
+# or
+hist(A, xlim=c(0,50), ylim=c(0,8), col="red")
+hist(B, add=T, col=rgb(0, 1, 0, 0.5))
+abline(v=mean(dat), col="black")
+abline(v=mean(A), col="red")
+abline(v=mean(B), col="darkgreen")
 </code>
@@ Line 673: / Line 680: @@
 > abline(v = mean.b, lty=2, lwd=3, col="darkgreen")
 >
+> # or
+> hist(A, xlim=c(0,50), ylim=c(0,8), col="red")
+> hist(B, add=T, col=rgb(0, 1, 0, 0.5))
+> abline(v=mean(dat), col="black")
+> abline(v=mean(A), col="red")
+> abline(v=mean(B), col="darkgreen")
 </code>
 {{c:ms:2025:schedule:pasted:20250409-075631.png?550}}
+{{:c:ms:2025:schedule:pasted:20250414-083514.png?550}}
 <code>
 > # mean.total 에서 그룹a의 평균까지의 차이를 구한 후