search for: x_tenth

...e tenth of the y asymptote asym<-coef(mod1)[1] tenth<-asym*0.1 abline(h=asym) abline(h=tenth,lty=5) text(10,65,"10% of max. transpiration",adj=0) ###finding corresponding x by y with inverse function: Asym=coef(mod1)[1] xmid=coef(mod1)[2] scal=coef(mod1)[3] y_tenth<-asym*0.1 x_tenth<-exp((xmid-log(Asym/y_tenth-1)*scal));names(x_tenth)<-"x" x_tenth abline(v=x_tenth) text(10,25,paste("at waterpot.:", round(x_tenth,2)),adj=0) -- View this message in context: http://n4.nabble.com/getting-CI-s-for-certain-y-of-nls-fitted-curve-tp1695025p1695025.html Sen...