请问在r语言中年龄怎么计算呢，多谢
有一个birthday变量是date格式的。
我开始用temp$birthyear<-factor(format(temp$BIRTHDAY,"%Y"))生成birthyear的变量，然后将其转换成numeric格式，然后用（2014-birthyear）得到的结果是不对的。因为用temp$birthyear<-as.numeric(temp$birthyear)转换后都变成两位数的格式了，
请问，各位有没有简单点的方法，或者我的这个方法错误在哪里？