First commit for Rcode for the four plots and images