##postscript("../WriteUp/Graphics/1984/aime_prob_7.eps", onefile=FALSE, horizontal=FALSE)

## Plot the function we computed "by hand"
##
x_pt_1 = 996:999
y_pt_1 = rep(c(997, 998), length(x_pt_1)/2)
x_pt_2 = 1000:1010
y_pt_2 = x_pt_2 - 3

xs = c(x_pt_1, x_pt_2)
ys = c(y_pt_1, y_pt_2)

plot(xs, ys, type='b', pch=19, xlab='n', ylab='f(n)')
grid()

##dev.off()