我自己會用下面的寫法
data$group<-
ifelse( data[,8] < 0.25 , 1 ,
ifelse( data[,8] < 0.50 & data[,8] > 0.25 , 2 ,
ifelse( data[,8] < 0.75 & data[,8] > 0.50 , 3 , 4 ) ) )
data$group<- factor( data$group ,
labels=c("group1","group2","group3","group4"))
或許可以參考看看
但我不確定在你的資料會不會比較快
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 220.133.37.133
※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1432300405.A.236.html