[R-es] Problemas con función factor to integer

[Alberto]

Hola,

estoy teniendo problemas para conseguir que mi función haga lo que quiero. Necesito que coja los valores de la variable que le indico, le quite la letra que precede a dichos valores y los convierta en números enteros. Dejo un ejemplo de los datos que estoy tratando y de varias opciones de función con las que intento que funcione sin resultado.

#Ejemplo
> head(road_accidents$Vehicle_Type,10)
 [1] X2  X11 X11 X19 X11 X11 X11 X11 X11 X11
Levels: X10 X11 X17 X19 X2 X20 X21 X3 X4 X5 X8 X9 X90 X97 X98

#Función Prueba 1
get.integer <- function(x)
{
  road_accidents %>%
    str_replace(road_accidents$x, 'X','') %>%
    as.integer(road_accidents$x)
}

#Función Prueba 2
get.integer2 <- function(dataframe, y)
{
  vector <- str_replace(dataframe[,y], 'X', '')
  vector <- as.integer(dataframe[,y])
  dataframe[,y] <- vector
}

#Función Prueba 3
get.integer3 <- function(x,y)
{
  vector <- x$y
  vector <- str_replace(vector, 'X', '')
  vector <- as.integer(vector)
  x$y <- vector
}

Gracias, un saludo.

	[[alternative HTML version deleted]]