A mocking framework for R5 Class in R