New R files and PNG file. Second commit