My R toolbox