BASE 2

1 fuel2 <- read.csv("combustible.csv")
2 fuel2$Carrocería <- NULL
3 fuel2$Caja_cambios <- NULL
4 fuel2$Marchas <- NULL
5 fuel2$Combustible <- NULL

1 fuel3 <- as.data.frame(scale(fuel2))
2 boxplot(fuel3) # Ahora todas las variables están en el mismo rango