Update cachematrix.R

update for matrix calc %*%