Extrae los primeros 2 caracteres en una cadena
Necesito extraer los primeros 2 caracteres en una cadena para luego crear la distribución del diagrama bin. vector:
x <- c("75 to 79", "80 to 84", "85 to 89")
He llegado hasta aquí:
substrRight <- function(x, n){
substr(x, nchar(x)-n, nchar(x))
}
invocar la función
substrRight(x, 1)
Respuesta
[1] "79" "84" "89"
Necesita imprimir los últimos 2 caracteres, no el primero.
[1] "75" "80" "85"