# TIC II · S29
coches <- read.csv("93cars_DATOS.csv", fileEncoding = "UTF-8-BOM")
# Ejemplo A: ejecuta la siguiente línea por separado.
nrow(coche)

# Ejemplo B: ejecuta estas dos líneas por separado.
precio <- coches$Mid.Price
mean("precio")