BLR_fit.R lastest 102813