Assignment2-Rprogramming