create Cachematrix.R