Initial Addition of files

Four R files and four plot PNG fils were addes