updated R file
second project; plot 1 finished
deleting test image