R script for peer review in Assignment 2.