*disclaimer
638179
一元配置分散分析
1) データは、以下の形式（タブ区切り）でテキストファイル保存
| group | ms |
|---|---|
| High | 438 |
| High | 374 |
| High | 313 |
| High | 337 |
| High | 393 |
| High | 432 |
| High | 380 |
| High | 390 |
| High | 354 |
| High | 322 |
| High | 328 |
| High | 305 |
| High | 386 |
| High | 348 |
| High | 271 |
| High | 398 |
| High | 401 |
| High | 380 |
| High | 324 |
| High | 347 |
| High | 350 |
| High | 234 |
| High | 327 |
| High | 375 |
| High | 325 |
| High | 338 |
| High | 366 |
| High | 348 |
| High | 398 |
| High | 290 |
| High | 384 |
| High | 443 |
| High | 303 |
| High | 343 |
| High | 358 |
| High | 393 |
| High | 363 |
| High | 411 |
| High | 389 |
| High | 379 |
| High | 246 |
| High | 408 |
| High | 393 |
| High | 326 |
| High | 405 |
| High | 321 |
| High | 353 |
| High | 361 |
| Low | 343 |
| Low | 470 |
| Low | 337 |
| Low | 353 |
| Low | 327 |
| Low | 326 |
| Low | 332 |
| Low | 393 |
| Low | 395 |
| Low | 435 |
| Low | 375 |
| Low | 311 |
| Low | 331 |
| Low | 303 |
| Low | 331 |
| Low | 369 |
| Low | 313 |
| Low | 351 |
| Low | 374 |
| Low | 390 |
| Low | 362 |
| Low | 285 |
| Low | 382 |
| Low | 298 |
| Low | 347 |
| Low | 375 |
| Low | 380 |
| Low | 364 |
| Low | 429 |
| Low | 375 |
| Low | 401 |
| Low | 307 |
| Low | 401 |
| Low | 394 |
| Low | 350 |
| Low | 351 |
| Low | 380 |
| Low | 340 |
| Low | 398 |
| Low | 351 |
| Low | 458 |
| Low | 427 |
| Low | 311 |
| Low | 341 |
| Low | 389 |
| Low | 363 |
| Low | 334 |
| Low | 386 |
2) Rで読み込む
items <- read.table(choose.files(), header=T, sep="\t")
3) 分散分析（以下のどちらでもよい）
summary(aov(items$ms ~ items$group))
anova(lm(items$ms ~ items$group))
https://sugiura-ken.org/wiki/