Version 1 cachematrix.R