edit cachematrix.R ver. 1