bib changes added, graph with previous model and piecewise regression in R