File cachematrix.R Modified