카이제곱 검정統계량

R로 배우는 범주형 데이터 추론

Andrew Bray

Assistant Professor of Statistics at Reed College

막대그래프 비교

비율 막대그래프: 국가 우주 지출 인식

비율 막대그래프: 국가 군사 지출 인식

가설 검정

null <- data %>%
  specify(var1 ~ var2) %>%
  hypothesize(null = "independence") %>%
  generate(reps = 100, type = "permute") %>%
  calculate(stat = ?)

통계량 선택

두 막대그래프 비교

통계량 선택

세 막대그래프 비교

통계량 선택

observed_counts

             party
natspac       Dem Ind Rep
  TOO LITTLE    8  13   9
  ABOUT RIGHT  22  37  17
  TOO MUCH     13  22   8

expected_counts

             party
natspac        Dem  Ind  Rep
  TOO LITTLE   8.7 14.5  6.8
  ABOUT RIGHT 21.9 36.7 17.3
  TOO MUCH    12.4 20.8  9.8

누적 막대그래프: 국가 우주 지출 인식

통계량 선택

observed_counts

             party
natspac       Dem Ind Rep
  TOO LITTLE    8  13   9
  ABOUT RIGHT  22  37  17
  TOO MUCH     13  22   8

expected_counts

             party
natspac        Dem  Ind  Rep
  TOO LITTLE   8.7 14.5  6.8
  ABOUT RIGHT 21.9 36.7 17.3
  TOO MUCH    12.4 20.8  9.8

(observed_counts - expected_counts) ^ 2

             party
natspac         Dem   Ind   Rep
  TOO LITTLE  0.433 2.240 4.641
  ABOUT RIGHT 0.005 0.076 0.117
  TOO MUCH    0.349 1.492 3.284

sum((observed_counts - expected_counts) ^ 2)

12.63565

카이제곱 거리

주석 포함 세 막대그래프 비교

연습해 봅시다!

R로 배우는 범주형 데이터 추론