创建的数据框
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编入新的变量中，应该如何写代码？