Tengo un data frame con una variable denominada ingresos (df$ingresos
).
En esta variable hay datos en euros y miles de euros en formato string
EJ: "24,4 Miles de euros" y "24785 euros"
Lo que quiero hacer es sacar los de euros, quitar la palabra euros, convertirlos en numérico y dividirlos entre 1000 para pasarlos a miles de euros. He realizado esto y lo he asignado a una nueva variable denominada euros.
Ahora quiero que estos valores sustituyan a los anteriores (solo a los de formato en euros).
He realizado estos pasos
library(stringr)
euros <- grep(" euros", df$ingresos, value=TRUE) #Obtengo los valores en euros
euros <- str_extract(euros, "\\d+(,\\d+)?") #Elimino la palabra euros
euros <- str_replace(euros, "[,]", ".") #Sustituyo comas por puntos
euros <- as.numeric(euros) #Convierto en int para poder operar
euros <- euros/1000 #Los convierto en miles de euros
Una vez hecho esto me gustaría sustituir los valores de la nueva variable euros, en la variable del dataframe, pero solo en aquellos donde en el string ponía euros a secas.