Stuff for my R Programming class