change cachematrix.R

home work