update BLR_fit.R