Edit BLR.fit.R to remove setwd()