trying to display original and fitted data (nls + dnorm) with ggplot2's geom_smooth() trying to display original and fitted data (nls + dnorm) with ggplot2's geom_smooth() r r