# TIC II · S23
coches <- read.csv("93cars_DATOS.csv", fileEncoding = "UTF-8-BOM")
hist(coches$Mid.Price, main = "Precios de los coches", xlab = "Precio (miles de dólares)")