Update simple_beta.R