My R tools