Update BLR_fit_R.R