2010-09-02 ■ R and stats lev <-levels(dat$host) lev <- lev[lev !="horai" & lev!="susuki"] levels(dat$host) <- lev 以下にエラー `levels<-.factor`(`*tmp*`, value = c("hati", "kene", "meda", : number of levels differs 消えないな。