Update additional-sample.R