code added to cachematrix.R