Update PA1_template.Rmd

Adding code foor the peer assigment