Adding initially missed figures and MD doc.

I needed to run this (RStudio UI approach didn't work):

library(knitr)
library(markdown)
knit("PA1_template.Rmd")