collection of my Rcode