Added R script.
Added slides and R scripts from class.