initialist first assignment week 4
skeleton function
Merge branch 'master' of https://github.com/safferli/learning-R