It has to be a boxplot? Or you can do something like this?
plot(quakes, pch=20, col=rgb(0,0,0,.1), lwd=.6)
Also, please make sure to follow our homework policy