Differences

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

--- degrees_of_freedom [2019/09/24 12:34] – hkimscil
+++ degrees_of_freedom [2019/09/24 12:37] – hkimscil
@@ Line 62: / Line 62: @@
 수학적인 증명을 보려면 [[:why n-1]] 참조
-<code>> k <- c(2, 3, 2, 4, 5, 5, 2, 2, 4, 1)
-> mean(k)
-[1] 3
-> var(k)
-[1] 2
-> sd(k)
-[1] 1.414214
->
-</code>
 <code>
+k <- c(2, 3, 2, 4, 5, 5, 2, 2, 4, 1)
 set.seed(1024)
 ks <- sample(k, 4)
@@ Line 79: / Line 70: @@
 sd(ks)
 (sd(ks)*3)/4
+#########
+mean(k)
+sd(k)
+</code>
+<code>
+> k <- c(2, 3, 2, 4, 5, 5, 2, 2, 4, 1)
+> k
+ [1] 2 3 2 4 5 5 2 2 4 1
+>
+> set.seed(1024)
+> ks <- sample(k, 4)
+> mean(ks)
+[1] 2.25
+> sd(ks)
+[1] 1.258306
+> (sd(ks)*3)/4
+[1] 0.9437293
+>
+> sd(k)
+[1] 1.414214
+>
+> mean(k)
+[1] 3
 </code>
 {{tag>"research methods" statistics n-1 "degrees of freedom" 자유도}}