Rprogramming Assmt3 Initial Code

First bit of code