(STAT2401) lab 4 RData update