Delete datain.R