adding coed to cachematrix.R