#
# 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.
# 
#-----

library(DAAG)

pairs( perf~syct+mmin++mmax+cach+chmin+chmax+estperf, data=cpus )

#postscript("../../WriteUp/Graphics/Chapter2/prob_14_plot.eps", onefile=FALSE, horizontal=FALSE)
lperf = log(cpus$perf)
lestperf = log(cpus$estperf)
plot( lperf ~ lestperf, xlab="log(perf)", ylab="log(estperf)" )
m = lm( lperf ~ lestperf )
abline(m)
#dev.off()