看瞎了...
dff<- as.numeric(as.character(dff))

> df <- data.frame(v=c(1,2,3),f=c('2','1','3'))
> df
  v f
1 1 2
2 2 1
3 3 3
> df$f<-factor(df$f, levels=c('3','2','1'),labels=c('b','a','c'))
> df
  v f
1 1 a
2 2 c
3 3 b
> as.character(df$f)
[1] "a" "c" "b"
> df$f
[1] a c b
Levels: b a c
> df <- data.frame(v=c(1,2,3),f=c('2','1','3'))  
> df
  v f
1 1 2
2 2 1
3 3 3
>
> df$f<-factor(df$f, levels=c('1','2','3'),labels=c('a','b','c'))
> df
  v f
1 1 b
2 2 a
3 3 c
>
> df$f<-as.numeric(df$f)
> df
  v f
1 1 2
2 2 1
3 3 3
levels最好按1，23从小到大排，这样就不会出错了
levels=c(“1”,“2”,“3”)