update new R notebook

Non-linear models