R programming assignment 2- inverse matrix