How to keep level value unchanged when converting to numerical

Question

I'm trying to convert all factor values into numerical in a dataset:

The code is pretty straight forward, I used two methods, both do not return the same level values as they were in factor format:

    teenSf2_3 <- mutate_if(teenSf2_2, is.factor, as.numeric)

    teenSf2_2[] <- lapply(teenSf2_2, function(x) as.numeric(as.factor(x)))

The result has different level values:

It seems there is an increment of 1 for each level. How do I keep the level values unchanged when converting to numerical?

Convert to character first then to numeric `... as.numeric(as.character(x))` — markus, Apr 06 '19 at 19:36

score 0 · Answer 1 · answered Apr 06 '19 at 19:36

0

I think I resolved the problem by using:

   teenSf2_2[] <- lapply(teenSf2_2, function(x) as.numeric(as.character(x)))

answered Apr 06 '19 at 19:36

lydias

1 Answers1