working copy

working copy of function cachematrix.R