R code to generate requested plots; initial commit.