#postscript("../../WriteUp/Graphics/Chapter2/chap_2_sect_2_prob_10_plot.eps", onefile=FALSE, horizontal=FALSE) x = seq( -1+1.e-1, 2-1.e-1, length.out=100 ) y = -sqrt( 2*x - 2*x^2 + 4 ) plot( x, y, type='l', xlab='x', ylab='y(x)' ) grid() #dev.off()