added 4 .R files and 4 .png