modified the cachematrix.R code to cache and calculate inverseof a matrix