Completed .R script files for two of three RProgrammingAssignment_3 functions