# This returns a character vector, the as.numeric() function # is still required to convert the values to the proper type (numeric). f <- levels(f)[f] f <- as.numeric(f)