カイ2乗検定

ポアソン分布からカイ2乗分布へ

個数 $n_1$, $n_2$, $n_3$, $\dots$ が独立で，それぞれ平均 ${\mu }_1$, ${\mu }_2$, ${\mu }_3$, $\dots$ のポアソン分布をするとします。ポアソン分布ですから $n_i$ の分散はその平均 ${\mu }_i$ に等しく，$n_i$ が10程度以上であれば正規分布で近似できるので，個数から平均を引いて標準偏差で割ればほぼ標準正規分布 $N(0,1)$ に従います。すると，

は独立な標準正規分布の2乗の $N$ 個の和です。一般に，独立な標準正規分布の2乗の $N$ 個の和の確率分布を，自由度 $N$ のカイ2乗分布と呼びます。

具体的な問題を考えましょう。毎年の事故発生件数が $n_1$, $n_2$, $n_3$, $\dots$, $n_N$ であるとき，1年あたりの平均事故件数は

になります。したがって，これらが独立にポアソン分布に従うという帰無仮説のもとで

は自由度 $N$ のカイ2乗分布に従いそうですが，ここでは $m$ は実際のデータから計算していますので，正しくは自由度 $N-1$ のカイ2乗分布になります。

個数の列が与えられたとき，上の ${\chi }^2$ の値を計算し，それがカイ2乗分布で予想される範囲から外れていれば，独立なポアソン分布であるという帰無仮説が疑わしくなります。このことを使った検定法は，ピアソン（Karl Pearson）のカイ2乗検定（${\chi }^2$ 検定）と呼ばれます。

例えばPISA「盗難事件」問題ほかで挙げた6年間の事故発生件数

> x = c(762,792,795,794,849,834)

が独立なポアソン分布に従うという帰無仮説についてカイ2乗検定をしてみましょう。Rでは次のようにして簡単に計算できます。

> chisq.test(x)

	Chi-squared test for given probabilities

data:  x 
X-squared = 6.2329, df = 5, p-value = 0.2842

$p$ 値は 0.2842 ですので，帰無仮説と矛盾しません。

分割表のカイ2乗検定

2×2分割表の縦計・横計

が与えられたとき，もし表の各行（各列）が独立ならば，

になるはずです。この予測値（期待度数）と実際の値（観測度数）との差の2乗を予測値で割ったものの合計

は近似的に自由度1の ${\chi }^2$（カイ2乗）分布に従います。自由度が1であることは，縦横の合計を固定した $2\times 2$ 分割表の自由度が一つしかないことを考えれば納得できるでしょう。$n_1\times n_2$ 分割表では自由度は $(n_1-1)(n_2-1)$ になります。

$2\times 2$ 分割表の場合に限って，それぞれの「予測値と実際の値との差」を0に近い側に0.5ずつ修正するというイェーツの連続性の補正（Yates' continuity correction）をする場合があります。

Rで ${\chi }^2$ 検定をする関数は chisq.test() です。単に

> chisq.test(matrix(c(228,863,284,851),nrow=2))

などとすれば，$2\times 2$ 分割表の場合に連続性の補正を行います。結果は $p=0.02377$ です。連続性の補正を行いたくないなら，

> chisq.test(matrix(c(228,863,284,851),nrow=2), correct=FALSE)

のようにします。結果は $p=0.02082$ となります。ちなみに Fisherの正確検定 の結果は $p=0.02335$ です。

［この項要再検討］ 観測度数を $O_i$，期待度数を $E_i$ とすると，${\chi }^2$ 検定は

$${\chi }^2=\sum _i(O_i-E_i{)}^2/E_i$$

を使いますが，類似のものとして，G検定（G-test）があります。これは

$$G=2\sum _i{O}_i\cdot \log (O_i/E_i)$$

の分布が同じ ${\chi }^2$ 分布で近似できることを使います（$O_i=0$ の項は対数が計算できませんが，単に 0 として計算します）。分野によっては ${\chi }^2$ 検定より人気があるようです。図は各セルに入る確率が $[\begin{array}{cc}0.12& 0.28\\ 0.18& 0.42\end{array}]$ で与えられる総度数50の $2\times 2$ 分割表を1000個作って，横軸はFisherの方法の $p$ 値，縦軸は連続性の補正なしの ${\chi }^2$ 検定の $p$ 値（○）とG検定の $p$ 値（×）をプロットし，対応する○と×を線分で結んだものです。

少なくともこの場合にはG検定の $p$ 値は小さすぎることがわかります。

このシミュレーションに使ったプログラムは次の通りです：

prob = c(0.12,0.18,0.28,0.42)
ni = 1000
pfis = pchi = pg = numeric(ni)
for (i in 1:ni) {
  k = sample(1:4, 50, replace=TRUE, prob=prob)
  na = sum(k == 1)
  nb = sum(k == 2)
  nc = sum(k == 3)
  nd = sum(k == 4)
  a = matrix(c(na, nb, nc, nd), nrow=2)
  pfis[i] = fisher.test(a)$p.value
  pchi[i] = chisq.test(a, correct=FALSE)$p.value
  pg[i]   = g.test(a)$p.value
}
plot(pfis, pchi, xlim=c(0,0.1), ylim=c(0,0.1), xlab="", ylab="")
abline(0,1)
for (i in 1:ni) {
  if (!is.na(pchi[i])) {
    points(pfis[i], pg[i], pch=4)
    lines(c(pfis[i],pfis[i]), c(pchi[i],pg[i]))
  }
}

奥村晴彦

Last modified: 2019-01-09 10:30:29