changed numeric() to matrix() on cachematrix.R