Differences

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

--- c:ma:2016:schedule:week09_answer [2016/11/09 09:44] – [E.g. 5] hkimscil
+++ c:ma:2016:schedule:week09_answer [2016/11/09 09:52] (current) – [E.g. 6] hkimscil
@@ Line 450: / Line 450: @@
 흡연이 기억에 영향을 준다고 할 수 있을까?
+<code>
+> smoke <- c(18,22,21,17,20,17,23,20,22,21)
+> nosmoke <- c(16,20,14,21,20,18,13,15,17,21)
+> sn <- data.frame(smoke, nosmoke)
+> ss <- stack(sn)
+> plot(ss$values~ss$ind)
+</code>
+<code>> t.test(values$ss~ind$ss)
+	Welch Two Sample t-test
+data:  ss$values by ss$ind
+t = -2.2573, df = 16.376, p-value = 0.03798
+alternative hypothesis: true difference in means is not equal to 0
+percent confidence interval:
+ -5.0371795 -0.1628205
+sample estimates:
+mean in group nosmoke   mean in group smoke
+.5                  20.1
+>
+>
+</code>
 ====== E.g. 7 ======
   - MASS package를 불러온 후, survey 데이터를 활용하여 담배와 운동량 간의 관계에 대한 가설테스트를 하시오.