#
# Written by:
# -- 
# John L. Weatherwax                2009-04-21
# 
# email: wax@alum.mit.edu
# 
# Please send comments and especially bug reports to the
# above email address.
# 
#-----

#postscript("../WriteUp/Graphics/1965/prob_21.eps", onefile=FALSE, horizontal=FALSE)

xs = seq( 2/3, 10, length.out=100 )
ys = log( 1 + 3/(xs^2), base=10 )
plot( xs, ys, xlab="X", ylab="f(X)" )
abline( v=2/3 )

#dev.off()