以下、返り値の違いに注意。 > as.numeric(factor(c(5,7,1,5,2))) [1] 3 4 1 3 2 > as.vector(factor(c(5,7,1,5,2))) [1] "5" "7" "1" "5" "2" > as.numeric(as.vector(factor(c(5,7,1,5,2)))) [1] 5 7 1 5 2