Submitting plot4.R and PNG graph