tengo una base de datos sobre la cual debo renombrar estas variables, las mismas cumplen un patrón en el final de los caracteres, lo que intento hacer es eliminar los últimos 3 para agregar la información que necesito, pero al momento de correr el código no me presenta error pero no modifica las variables.
Este es el código:
modificar_variable <- function(columna) {
nueva_variable <- paste0(substr(columna, 1, nchar(columna)-3))
return(nueva_variable)
}
nuevos_caracteres <- function(valor) {
nuevo_valor <- paste0(valor, "0_45")
return(nuevo_valor)
}
vector = list("Prótesis_prescripción_45",
"Prótesis_prescripción_3")
for (col in vector) {
mydata1[, col] <- modificar_variable(mydata1[, col], nuevos_caracteres)
}