Load R script for course project