Completed cacheMatrix.R, put in cachemean.R also to experiment