因子のダミー変数化
# ダミー変数（因子）のデザイン
x <- factor(c("a", "b", "c"))
contrasts(x) # 標準では1番目の因子を基準としたダミー変数
## b c
## a 0 0
## b 1 0
## c 0 1
contr.treatment(x, base = 1) # 上と同じ（baseで基準となる因子を指定）
## b c
## a 0 0
## b 1 0
## c 0 1
contr.treatment(x, base = 2) # 2番目の因子を基準に
## a c
## a 1 0
## b 0 0
## c 0 1
contr.sum(x) # 和が0になるようなダミー変数
## [,1] [,2]
## a 1 0
## b 0 1
## c -1 -1