创建的数据框
manager<-c(1,2,3,4,5)
date<-c("10/24/08","10/28/08","10/1/08","10/12/08","5/1/09")
coutry<-c("US","US","UK","UK","UK")
gender<-c("M","F","F","M","F")
age<-c(32,45,25,39,99)
q1<-c(5,3,3,3,2)
q2<-c(4,5,5,3,2)
q3<-c(5,2,5,4,1)
q4<-c(5,5,5,NA,2)
q5<-c(5,5,2,NA,1)
leadership<-data.frame(manager,date,coutry,gender,age,q1,q2,q3,q4,q5,stringAsFactors=FALSE)
使用recode函数
library(car)
recode(leadership$age,"32='youngst';25:39='young';else='old'")
leadership
但我得到的结果中,年龄仍然是年龄,而不是新的old, young分类:
> recode(leadership$age,"32='youngst';25:39='young';else='old'")
[1] "youngst" "old" "young" "young" "old"
> leadership
manager date coutry gender age q1 q2 q3 q4 q5 stringAsFactors
1 1 10/24/08 US M 32 5 4 5 5 5 FALSE
2 2 10/28/08 US F 45 3 5 2 5 5 FALSE
3 3 10/1/08 UK F 25 3 5 5 5 2 FALSE
4 4 10/12/08 UK M 39 3 3 4 NA NA FALSE
5 5 5/1/09 UK F 99 2 2 1 2 1 FALSE
问题1:如何解决这个问题?
问题2:如果我想使用recode建立新的变量agecat,将 young, old编入新的变量中,应该如何写代码?