Updated with read.csv() to make scripts self-contained
updated plot 3