## 작성일: 2017.10.09
## 작성자: 춤추는 초코칩
## 참고문헌: R 실습으로 배우는 통계적 방법(2016, 박진표)
## 6장 두 집단 비교에 관한 추론
## 6.2 짝진 모집단의 평균 비교(쌍체비교)
## 쌍으로 된 두집단의 차를 계산해서 평균을 비교하는 방법
# 예제. 왼손(x)와 오른손(y)의 악력을 비교
x <- c(41.11,38.35,38.57,42.54,37.46,40.13,43.05,36.00,40.45,36.39,45.38,38.42,37.39,38.30,33.33)
y <- c(30.37,25.90,29.60,34.22,33.46,41.91,30.80,31.74,34.28,31.13,31.24,30.63,29.99,33.20,33.32)
d_i <- x-y
boxplot(d_i, horizontal=TRUE, main="Boxplot of Difference")
이상치는 없고 악력의 차이가 있는 것처럼 보인다.
shapiro.test(d_i)
t.test(x, y, mu=0, paired=TRUE, alternative="two.sided")
정규성검정에서 p값(0.8867)이 유의수준(0.05)보다 작으므로 두 집단의 차이의 분포는 정규분포에서 추출된 표본이라고 할 수 있는 근거가 있다.
t분포를 이용해서 두 집단의 평균을 비교할 수 있다.
모평균의 차이에 대한 점추정: 7.005333
모평균의 차이에 대한 구간추정: (4.535737, 9.474930)
모평균의 차이에 대한 검정은 p값(2.819e-05)이 유의수준(0.05)보다 작으므로 귀무가설을 기각한다.
오른손과 왼손의 악력이 차이가 있다고 할 수 있다.
'기초통계' 카테고리의 다른 글
[기초] 19. [R] 두 모분산의 비교 (0) | 2017.10.12 |
---|---|
[기초] 18. [R] 두 모비율의 비교 (0) | 2017.10.11 |
[기초] 16. [R] 두 독립 모집단의 평균 비교 (0) | 2017.10.09 |
[기초] 15. [R] 모비율, 모분산에 대한 추론 (0) | 2017.10.08 |
[기초] 14. [R] 모평균에 대한 추론:샤피로-윌크 검정 (0) | 2017.10.07 |