メモ:分散分析:2要因分散分析対応なし
差分
このページの2つのバージョン間の差分を表示します。
次のリビジョン | 前のリビジョン次のリビジョン両方とも次のリビジョン | ||
メモ:分散分析:2要因分散分析対応なし [2015/12/27 17:38] – 作成 Wiki Editor | メモ:分散分析:2要因分散分析対応なし [2015/12/27 19:01] – Wiki Editor | ||
---|---|---|---|
行 26: | 行 26: | ||
| ... |||| | | ... |||| | ||
+ | |||
+ | > ID <- rep(1:30); | ||
+ | > SEX <- c(rep(" | ||
+ | > CN <- rep(c(rep(" | ||
+ | > SCORE <- c(3, | ||
+ | > df <- data.frame(ID=ID, | ||
+ | > df | ||
+ | ID SEX CN SCORE | ||
+ | 1 | ||
+ | 2 | ||
+ | 3 | ||
+ | 4 | ||
+ | 5 | ||
+ | 6 | ||
+ | 7 | ||
+ | 8 | ||
+ | 9 | ||
+ | 10 10 男 韓国 | ||
+ | 11 11 男 米国 | ||
+ | 12 12 男 米国 | ||
+ | 13 13 男 米国 | ||
+ | 14 14 男 米国 | ||
+ | 15 15 男 米国 | ||
+ | 16 16 女 日本 | ||
+ | 17 17 女 日本 | ||
+ | 18 18 女 日本 | ||
+ | 19 19 女 日本 | ||
+ | 20 20 女 日本 | ||
+ | 21 21 女 韓国 | ||
+ | 22 22 女 韓国 | ||
+ | 23 23 女 韓国 | ||
+ | 24 24 女 韓国 | ||
+ | 25 25 女 韓国 | ||
+ | 26 26 女 米国 | ||
+ | 27 27 女 米国 | ||
+ | 28 28 女 米国 | ||
+ | 29 29 女 米国 | ||
+ | 30 30 女 米国 | ||
+ | |||
+ | 2要因以上の分散分析の場合、タイプ1平方和では問題がでる。タイプ1平方和だと、要因を検討する順序によって、平方和が変化する。それに対応するため、SPSSではタイプ3平方和が使われる。Rでタイプ3平方和を計算するにはcarパッケージのAnova()関数が使えるが、その際、対比の方法を適切に設定してやる必要がある。Rでは、カテゴリ変数は適切にダミー変数に変換されるが、その変換方式によって平方和の計算が変わってくる。タイプ3平方和を適切に計算するには、contrastsをcontr.sumに変更しておく必要がある(1行目)。contrastsの2番目に指定した要素は、順序カテゴリカル変数の場合の指定。今回は無関係。 | ||
+ | |||
+ | > res.lm <- lm(SCORE ~ SEX*CN, df); | ||
+ | > Anova(res.lm, | ||
+ | Anova Table (Type III tests) | ||
+ | | ||
+ | Response: SCORE | ||
+ | Sum Sq Df F value Pr(>F) | ||
+ | (Intercept) 537.63 | ||
+ | SEX | ||
+ | CN 0.47 2 | ||
+ | SEX: | ||
+ | Residuals | ||
+ | |||
+ | まず、lm()関数で推定し、その結果を分散分析する。lm()関数では、性別と国に加えて、両者の交互作用も含めて検討する。 | ||
+ | |||
+ | 結果は、主効果は有意ではないが、交互作用が有意になっている。 |
メモ/分散分析/2要因分散分析対応なし.txt · 最終更新: 2015/12/28 12:44 by Wiki Editor