Added R scripts from class.