R/as_numeric_factor.R

In gkane26/rextras: utility functions (mostly for ggplot)

Defines functions as.numeric.factor

Documented in as.numeric.factor

#' Convert factor to numeric
#'
#' @param x factor vector
#'
#' @return numeric vector
#'
#' @export as.numeric.factor
as.numeric.factor <- function(x) {
  as.numeric(levels(x)[x])
}