Initial commit of 4+1(5) R files and 4 png files