Added code to cachmatrix.R