Create delete.R