Uso de tapply para el subconjunto de datos.

Tengo un conjunto de datos de ventas de automóviles y los subdividí en diferentes grupos de la siguiente manera:

Marca de automóviles y año de ventas.

toyota=subset(car, brand=="Toyota")
toyota.yr = cut(toyota$date, "year")
honda=subset(car, brand=="Honda")
honda.yr = cut(honda$date, "year")

etc.

Así que ahora tengo 6 subgrupos para las marcas de autos y luego uso tapply para obtener el promedio de ventas de cada marca por año:

tapply(toyota$price, toyota.yr, mean, na.rm=TRUE)

Me gustaría hacer esto a los 6 subgrupos, ¿hay alguna forma de hacerlo al mismo tiempo en lugar de escribir la función tapply 6 veces?

Aprecio cualquier ayuda, gracias!

Respuestas a la pregunta(1)

Su respuesta a la pregunta