2nd prog ass: cachematrix.R