#define factor vector
factor_vector <- factor(c(1, 5, 7, 8))
#convert factor vector to numeric vector
numeric_vector <- as.numeric(as.character(factor_vector))
#view class
class(numeric_vector)
[1] "numeric"
#create data frame
df <- data.frame(a = factor(c(1, 5, 7, 8)),
b = c(28, 34, 35, 36))
#convert column 'a' from factor to numeric
df$a <- as.numeric(as.character(df$a))
#view new data frame
df
a b
1 1 28
2 5 34
3 7 35
4 8 36
#confirm class of numeric vector
class(df$a)
[1] "numeric"