例題:
「10 人の被検者について,ある測定値を得た。同じ被検者に対して,1 年後にもう一度測定した。その結果を表 1 に示す。1 年間で母代表値に差があったかどうか検定しなさい。」
| 被験者 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 |
|---|---|---|---|---|---|---|---|---|---|---|
| Xi | 269 | 230 | 365 | 282 | 295 | 212 | 346 | 207 | 308 | 257 |
| Yi | 273 | 213 | 383 | 282 | 297 | 213 | 351 | 208 | 294 | 238 |
R による解析:
> x <- c(269, 230, 365, 282, 295, 212, 346, 207, 308, 257) > y <- c(273, 213, 383, 282, 297, 213, 351, 208, 294, 238) > wilcox.test(x, y, paired=T) Wilcoxon signed rank test with continuity correction data: x and y V = 22, p-value = 1 alternative hypothesis: true mu is not equal to 0 Warning messages: 1: Cannot compute exact p-value with ties in: wilcox.test.default(x, y, paired = T) 2: Cannot compute exact p-value with zeroes in: wilcox.test.default(x, y, paired = T)