xs = seq(-3.25, +3.25, length.out=200)
ys = (xs-3)^2 * (xs-1)^3 * (xs + 2)^2 * (xs+3)^2

postscript("../WriteUp/Graphics/1983_to_1988_dropped_AHSME_problems/1983_to_1988_dropped_AHSME_problems_prob_2.eps", onefile=FALSE, horizontal=FALSE)
plot(xs, ys, type='l', lwd=2, xlab='x', ylab='g(x)')
abline(h=0, lwd=3, col='red')
grid()
dev.off()