Plot 5

Coding plot 5 as a bar plot, with agg_car