t-test_summing_up
Differences
This shows you the differences between two versions of the page.
| Next revision | Previous revision | ||
| t-test_summing_up [2025/09/08 07:59] – created hkimscil | t-test_summing_up [2025/09/08 08:09] (current) – [t-test summing up output] hkimscil | ||
|---|---|---|---|
| Line 285: | Line 285: | ||
| </ | </ | ||
| ====== t-test summing up output ====== | ====== t-test summing up output ====== | ||
| + | <WRAP group> | ||
| + | <WRAP column half> | ||
| < | < | ||
| > rm(list=ls()) | > rm(list=ls()) | ||
| Line 297: | Line 299: | ||
| + } | + } | ||
| > | > | ||
| + | </ | ||
| + | </ | ||
| + | <WRAP column half> | ||
| + | EXP. | ||
| + | * 필요한 펑션들 | ||
| + | * se standard error 값을 구하는 펑션 | ||
| + | * ss sum of square 값을 구하는 펑션 | ||
| + | </ | ||
| + | </ | ||
| + | |||
| + | <WRAP group> | ||
| + | <WRAP column half> | ||
| + | < | ||
| > N.p <- 1000000 | > N.p <- 1000000 | ||
| > m.p <- 100 | > m.p <- 100 | ||
| Line 320: | Line 335: | ||
| > abline(v=mean(p2), | > abline(v=mean(p2), | ||
| > | > | ||
| + | </ | ||
| + | </ | ||
| + | <WRAP column half> | ||
| + | {{: | ||
| + | </ | ||
| + | </ | ||
| + | |||
| + | <WRAP group> | ||
| + | <WRAP column half> | ||
| + | < | ||
| > s.size <- 100 | > s.size <- 100 | ||
| > s2 <- sample(p2, s.size) | > s2 <- sample(p2, s.size) | ||
| Line 333: | Line 358: | ||
| [1] -2 2 | [1] -2 2 | ||
| > | > | ||
| - | > mean(p1)+se.z.range | + | |
| + | > mean(p1) + se.z.range | ||
| [1] 98 102 | [1] 98 102 | ||
| > mean(s2) | > mean(s2) | ||
| [1] 111.4782 | [1] 111.4782 | ||
| - | > | + | > |
| + | </ | ||
| + | </ | ||
| + | <WRAP column half> | ||
| + | |||
| + | </ | ||
| + | </ | ||
| + | |||
| + | <code> | ||
| > z.cal <- (mean(s2) - mean(p1)) / se.z | > z.cal <- (mean(s2) - mean(p1)) / se.z | ||
| > z.cal | > z.cal | ||
t-test_summing_up.1757285946.txt.gz · Last modified: 2025/09/08 07:59 by hkimscil