test.r

test functionality of cached inverse