遊び 2x2分割表がある カイ二乗統計量を計算することが多い 群内分散と群間分散とも計算してその比をとったりしてみよう n.iter <- 1000 chis <- ss <- ss2 <- rep(0,n.iter) v <- sample(100:500,4) m <- matrix(v,2,2) a <- apply(m,1,sum) b <- apply(m,2…