Update cachematrix.R

There is a much more easier solution for this exercise; if we don't care about the nameing of the functions and the variables, we have just to exchange in the example given for the exercise one lione to get the job done:. this line is:  (m <- solve(data)) instead of (m <- mean(data, ...)).