Added plot 3 and commented the read_energy function

Also made plot1.R use the read_energy() shared function.  removed
setwd's to my personal directory.