Added png and R files for 4th plot