忍者ブログ
×

[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。


処理対比 (treatment contrast)
> contr.treatment(3)
  2 3
1 0 0
2 1 0
3 0 1

SASっぽい対比
> contr.SAS(3)
  1 2
1 1 0
2 0 1
3 0 0

零和対比 (zero sum contrast)
> contr.sum(3)
  [,1] [,2]
1    1    0
2    0    1
3   -1   -1

ヘルマート対比 (helmert contrasts)
> contr.helmert(3)
  [,1] [,2]
1   -1   -1
2    1   -1
3    0    2

多項式対比 (polynomial contrast)
> contr.poly(3)
            .L     .Q
[1,] -7.07e-01  0.408
[2,] -9.07e-17 -0.816
[3,]  7.07e-01  0.408


# 現在の対比係数を調べる
> options()$contrasts
        unordered           ordered
"contr.treatment"      "contr.poly"

# 対比係数を変える
options(contrasts = c("contr.sum", "contr.sum"))
PR
Comment
Trackback
Trackback URL

Comment form
Title
Color & Icon Vodafone絵文字 i-mode絵文字 Ezweb絵文字  
Comment
Name
Mail
URL
Password
プロフィール
HN:
tao
HP:
性別:
非公開
職業:
会社員
趣味:
アウトドア、自転車、ジョギング、英語学習
自己紹介:
・千葉在住のサラリーマンです。データ分析っぽいことが仕事。
・今年英検1級取得。今はTOEIC高得点を目指して勉強中。
・興味のあることは野球、アウトドア、英語学習、統計、プログラミング、PC関係などなど。
ブログ内検索
freead
順位表
プロ野球データFreak
セリーグ順位表
パリーグ順位表