Update cachematrix.R

first quick scriupting of makeCacheMatrix