1

Estimados buenos días,

Estoy trabajando una base de datos pero me he encontrado con un problema quizás alguno por favor pueda ayudarme.

Tengo un data.frame y en una de las variables quiero cambiar la secuencia. mi variable inicial se ve así:

Cambio que deseo: El tercer dígito despues de "HI" quiero reemplazarlo por un guión y antes del último dígito quiero colocar un guión bajo. debería quedarme como sigue.

introducir la descripción de la imagen aquí

Muchas gracias

2
  • 1
    Pulsa en editar y muestra lo que has intentado hasta el momento. No olvides colocar el código y los ejemplos como texto, con formato. Lee Cómo preguntar y haz el recorrido de bienvenida para conocer el funcionamiento del sitio.
    – padaleiana
    Commented el 22 jun. 2022 a las 12:14
  • Bienvenida a Stack Overflow en español, te sugiero que hagas el recorrido de bienvenida y de paso ganes tu primer medalla, también es muy importante que leas Cómo preguntar para poder mejorar tu pregunta y que sea bien recibida por la comunidad mejorando así, tus chances de obtener buenas respuestas. Commented el 22 jun. 2022 a las 14:23

1 respuesta 1

0

Puedes crear una función propia con gsub y sub junto a expresiones regulares para realizar las órdenes que mencionas primero reemplazando el 3er carácters y luego añadiendo el guión bajo entre el punúltimo y último dígito:

Variable_1 <- c('HI11041','HI11052','HI21033')

reemplazo <- function(x){
  x <- gsub(pattern = 'HI[0123456789]',replacement = 'HI-',x = x)
  ultima <- sub(pattern = '.*(?=.$)',replacement = '',x = x, perl = T)
  gsub(pattern = '[0123456789]$',replacement = paste0('_',ultima),x = x)
}

sapply(Variable_1, reemplazo, USE.NAMES = F)
# [1] "HI-104_1" "HI-105_2" "HI-103_3"

Tu Respuesta

By clicking “Publica tu respuesta”, you agree to our terms of service and acknowledge you have read our privacy policy.

¿No es la respuesta que buscas? Examina otras preguntas con la etiqueta o formula tu propia pregunta.