기본 콘텐츠로 건너뛰기

R의 고전 검사 - one-sample t-test (일표본 t 검정)


 통계 분석에서 가장 기초가 되는 것은 조사 집단의 평균이 서로 차이가 있는가? 그리고 이전에 알려진 평균과 차이가 얼마나 나는가? 라는 질문일 것입니다. 이는 통계 분석의 가장 기본이 되기 때문에 보통 통계 관련 서적에서 평균, 분산, 표준편차 같은 기본 개념을 배운 후 가장 먼저 배우게 되는 통계적 방법이 될 것입니다. 


 일단 하나의 조사 집단의 평균이 이전에 알려진 평균과 차이가 나는지 보는 one-sample t-test (일표본 t 검정)를 알아보겠습니다. 흔히 알려져 있는 평균과의 비교로 불립니다. 여기서는 키가 평균 170cm이고 표준편차가 5인 15명으로 이뤄진 집단의 가상 데이터를 정규 분포로 만들어보겠습니다. 이를 테면 A반의 남자 학생 15명의 키라고 볼 수 있습니다. 


> set.seed(1234)
> A<-rnorm span="">
> A
 [1] 163.9647 171.3871 175.4222 158.2715 172.1456 172.5303 167.1263 167.2668 167.1777 165.5498 167.6140 165.0081 166.1187 170.3223 174.7975


 앞서 언급했듯이 시드값 설정은 같은 난수를 만들기 위해입니다. 즉 매번 같은 숫자를 만들기 위해서이죠. 소수점 4자리 까지 표시된 이유는 R이 기본적으로 7자리를 표시하기 위해서입니다. 만약 이 숫자가 보기 싫다면 round() 함수를 사용할 수 있습니다. 여기서는 그냥 사용합니다. 


 만약 알려진 키의 평균이 171cm이라면 어떨까요. 함수 t.test를 이용해서 one-sample t-test를 진행할 수 있습니다. 과연 A반 남학생의 키는 알려진 평균보다 낮을까요? 그런데 그 전에 사실 정규 분포가 맞는지를 검증해야 합니다. 앞서 본 사피로 윌크 검정을 이용해서 모수적 방법을 사용해도 되는지 보겠습니다. 


> shapiro.test(A)

Shapiro-Wilk normality test

data:  A
W = 0.95713, p-value = 0.6426


 이 데이터는 정규 분포하는 데이터로 모수적 방법인 t 검정을 적용해도 될 것입니다. 비모수적 방법에 대해서는 나중에 설명하겠습니다. 여기서는 통계에 대해서 기본적인 지식은 있다고 보고 R로 이를 어떻게 검증하고 해석하는지만 설명할 것입니다. 이제 알려진 평균과 비교해보기 위해서 평균 mu 를 설정합니다. 앞서 이야기했듯이 가정한 평균은 171cm를 일단 넣어보겠습니다. 

> t.test(A,mu=171)

One Sample t-test

data:  A
t = -2.3023, df = 14, p-value = 0.03719
alternative hypothesis: true mean is not equal to 171
95 percent confidence interval:
 165.8108 170.8162
sample estimates:
mean of x 
 168.3135 

 결과는 t 통계량 -2.3023, 자유도 (df) 14, P 값은 <0 .05="" 170.8162="" 172cm="" 5="" 95="" nbsp="" span="">


> t.test(A,mu=172)

One Sample t-test

data:  A
t = -3.1592, df = 14, p-value = 0.006963
alternative hypothesis: true mean is not equal to 172
95 percent confidence interval:
 165.8108 170.8162
sample estimates:
mean of x 
 168.3135
 

 값을 보니 나머지는 사실 같은데 t 통계량이 -3.1592로 커졌고 P 값도 더 작아졌습니다. 따라서 통계적으로 알려진 평균과 같을 가능성이 매우 낮다고 하겠습니다. 


 이렇게 일표본 t 검정의 방법과 해석에 대해서 설명했습니다. 그 다음은 두 개의 표본이 서로 차이가 있는지 보는 고전 검사인 스튜던트 t 검정에 대해서 알아보겠습니다. 


 마지막으로 지금 설명하는 t 검정에 대해서 참조하면 좋은 글입니다. 


댓글

이 블로그의 인기 게시물

100 테슬라급 자기장 도달

 미국의 로스 알라모스 국립 연구소 (Los Alamos National Laboratory) 에서 과학자들이 지금까지 인간이 개발한 가장 강력한 자기장을 발생시키는 장치 개발에 도전하고 있습니다. 자기장의 세기를 나타내는 방법으로 자기력선의 밀도를 나타내기 위해 단위 면적당 자기력선의 수를 표시하는 단위인 테슬라 (T) 가 있습니다. (1T = 1Wb/㎡  웨버 (Wb) 는 자속의 단위)   의료용으로 사용되는 초전도체를 이용한 MRI 의 경우 1.5 - 3 테슬라급의 강력한 자기장으로 인체 내부를 볼 수 있게 만들지만 과학 연구용으로 이보다 더 강력한 자기장이 필요할 수 있습니다. 최근에 등장한 90 테슬라급 자기장에 이어 이번에 로스 알라모스 국립 연구소에서는 100 테슬라급인 100.75 T 를 실현 했다고 합니다.   이를 구현한 것은 18000 파운드 (8.16 톤 정도) 의 코일과 여기에 에너지를 공급할 1200 메가줄 (Megajoule) 급 모터 제네레이터등의 설비입니다.  (   The 1,200-megajoule motor generator that powers the magnetic pulse.  )  이와 같은 연구를 통해 알아내고자 하는 것은  Quantum Phase transitions and new ultra high field magnetic states Electronic Structure determination Topologically protected states of matter  로 요약할 수 있다고 합니다.   아무튼 수 T 급 MRI 만 해도 자기장의 힘이 엄청난데 100 T 라니 엄청난 자기장이네요. 이는 지구 자기장 세기보다 200만배 강력한 (물론 좁은 범위에서 작용하는 자기장이라 지구 전체...

고대 양서류 이야기 (2) - 악어를 닮은 거대 양서류들

  페름기에는 다양한 양막류가 진화해서 앞서 소개한 육상형 템노스폰딜리는 점차 설 자리를 잃게 됩니다. 하지만 양서류는 본래 자신의 서식지인 물과 습지에서 여전히 번성을 누렸습니다. 당시에는 악어류 같은 대형 양서형 파충류도 없던 시절이었기 때문에 이와 비슷한 생태학적 지위는 여전히 양서류의 몫이었습니다. 이들에 대한 이야기는 제 책인 포식자에서 비교적 간단히 다뤘는데, 오늘은 여기에 대한 보충 설명입니다.  책 정보:  http://book.naver.com/bookdb/book_detail.nhn?bid=13347200 Yes 24:  http://www.yes24.com/24/goods/58772859 11번가:  http://books.11st.co.kr/product/SellerProductDetail.tmall?method=getSellerProductDetail&prdNo=1977867160 알라딘:  http://www.aladin.co.kr/shop/wproduct.aspx?ItemId=134877825 교보문고:  http://www.kyobobook.co.kr/product/detailViewKor.laf?ejkGb=KOR&mallGb=KOR&barcode=9788970447988&orderClick=LAG&Kc= 인터파크 :  http://book.interpark.com/product/BookDisplay.do?_method=detail&sc.prdNo=279593764&sc.saNo=003002003&bid1=search_auto&bid2=detail&bid3=prd_img&bid4=001 영풍문고:  http://www.ypbooks.co.kr/book.yp?bookcd=100843205&gubun=NV ...

이빨이 다시 진화한 개구리

  ( CT scans of Gastrotheca guentheri skulls revealed what appeared to be identical rows of teeth on both the upper and lower jaws, which researchers later confirmed through dissection. Credit: Florida Museum/Daniel Paluh )  개구리는 2억년 전 진화 과정에서 이빨을 잃어버리고 큰 턱과 혀를 이용해 곤충 같은 작은 먹이를 잡아 먹는 방향으로 진화했습니다. 파충류나 포유류 같은 다른 사지류와의 경쟁에서 밀려 양서류가 쇠퇴하고 멸종하던 시기에도 개구리는 여전히 생존할 수 있었던 비결입니다.   이빨이 없는 덕분에 큰 혀를 발사하기 편해졌을지는 모르지만, 이빨이 없으면 종종 불편할 때가 있습니다. 씹는 대신 삼키기 때문에 음식을 씹을 수 없다는 점은 문제되지 않지만, 필사적으로 달아나려는 먹이를 잡기 힘들기 때문입니다. 이런 이유 때문에 일부 개구리는 이빨 같이 보이는 엄니 (fang)을 지니고 있으나 이는 사라진 이빨이 다시 난 것이 아니라 다른 부분이 진화한 것입니다.   이는 돌로의 법칙 ( Dollo's Law )으로 알려져 있습니다. 진화 과정에서 퇴화한 부분이 다시 생겨나지 않으며 대신 필요하면 다른 부분이 진화해 그 역할을 대신한다는 것입니다. 예를 들어 아가미가 사라진 사지 동물은 다시 물에 들어온다고 해도 아가미가 다시 생기진 않습니다. 대신 고래처럼 폐가 커져서 그 기능을 대신하게 됩니다.   하지만 모든 법칙엔 예외가 있기 마련입니다. 남미에서 발견된 멸종 위기 개구리 중 하나인 구엔터 유대류 개구리 ( Gastrotheca guentheri, Guenther's marsupial frog, dentate marsupial frog)는 완전한 형태의 이빨을 지니고 있습니다. 참고로 유대류 개구리라는 명칭은...