Carlos Aguilar´s R file with Iinversal matrix functions