Adding four R programs and four plots