adding R script to make a few plots to summarize population data