my cache matrix.R