assignment2 cachematrix.R