Add files

Add 4 .R and 4 .png files