Copy and pasted the initial bodies
Added R history files to git ignore
Updated the code to calculate the inverse
Added comments about what the functions do