Course project1: Updated R file and PNG file