Delete Example- how estimator and simulator work.R