Displaying 1 result from an estimated 1 matches for "eonr2".
Did you mean:
eonr
2004 Mar 17
0
NLS question:Quadratic plus plateau fit
...data=data.1,
start=list(b0=125, b1=0.5, b2=-0.001, x0=135),
trace=T)
qp.nls.fit
summary(qp.nls.fit)
c.qp.fit <- coefficients(qp.nls.fit)
attach(as.list(c.qp.fit))
yld.x0 <- b0 + b1*x0 + b2*x0^2
maxn <- -b1/(2*b2)
eonr <- (ratio - b1)/(2*b2)
eonr2 <- round(eonr, digits = 0)
yldmaxn <- b0 + b1*maxn + b2*maxn^2
yldeonr <- b0 + b1*eonr + b2*eonr^2
yldeonr2 <- round(yldeonr, digits = 0)
plot(yield ~ nrate,
pch = 16,
main = "Quadratic plus Plateau Model",
xlab = expression(paste("Nitrogen rate [lbs ac&qu...