アールメカブ

Rの備忘録

R_reFactorも参照

R_データのカテゴリ化も参照

要らない要素を省いておいて

dat2 <- dat[dat$Age != "30代" & dat$Age != "40代" & dat$Age != "50代",]

引数に drop を使えば良い

dat2$Age <- dat2$Age[, drop =  TRUE]

ある個体の二つの変数に対する反応に，一方では水準 A B E だけが，もう片方で C D E だったとする． この二つを統合するには，次のようにする？

x <- as.factor(c("A","A","A", "B", "E","E","E"))
y <- as.factor(c("C","C","C", "D","D", "E","E"))
levels(x)
 # [1] "A" "B" "E"
levels(y)
 # [1] "C" "D" "E"

xtabs(~ x + y)
 ##   y
## x   C D E
##   A 3 0 0
##   B 0 1 0
##   E 0 1 2
## > 

x <- factor(x, levels = c(levels(x), "C","D"))
y <- factor(y, levels = c(levels(y), "A","B"))
levels(x)
 # [1] "A" "B" "E" "C" "D"
levels(y)
 # [1] "C" "D" "E" "A" "B"
xtabs(~ x + y)
 ##    y
 ## x   C D E A B
 ##   A 3 0 0 0 0
 ##   B 0 1 0 0 0
 ##   E 0 1 2 0 0
 ##   C 0 0 0 0 0
 ##   D 0 0 0 0 0