my rprogramming assignment 2 solution