powered by
xyplot(count ~ score, WorldCup, type='h', lwd=4) barchart(count ~ score, WorldCup, origin=0, horizontal=FALSE)
Run the code above in your browser using DataLab