Answer for first Question
modification of plot1.R
Second Commit