Delete estimation.R