Hye, your formula is not good , you need to have a column as factor (motorist for exemple) and to plot. This column is missing in your data. Supose you include this column "motorist"
motorist<-c("A","B","C","B","B","B","B","A","A","A","A","C","C","A","B","C")
motor<-cbind(motorist,motor)
aov(w~motorist,motor)
will work