Delete plot 4.R