>>> x <- rnorm(100, mean=0)   # 정규 분포에서 난수 100개 생성
>>> shapiro.test(x)           # 정규성 검정, 정규 분포를 따름
       Shapiro-Wilk normality test
data: x
W = 0.98895, p-value = 0.581

CO2   # 예제 데이터 확인
   Plant     Type    Treatment   conc   uptake
1    Qn1   Quebec   nonchilled     95     16.0
2    Qn1   Quebec   nonchilled    175     30.4
3    Qn1   Quebec   nonchilled    250     34.8
4    Qn1   Quebec   nonchilled    350     37.2
5    Qn1   Quebec   nonchilled    500     35.3
… 생략 …
>>> y <- CO2[, 5]     # 예제 데이터 중 5번째 열 선택
>>> shapiro.test(y)   # 정규 분포를 따르지 않음
       Shapiro-Wilk normality test
data: y
W = 0.94105, p-value = 0.0007908