forgot plot 1 R file and PNG