NEC(fixed = c(NA, NA, NA, NA), names = c("b", "c", "d", "e"), fctName, fctText)
NEC.2(upper = 1, fixed = c(NA, NA), names = c("b", "e"), ...)
NEC.3(fixed = c(NA, NA, NA), names = c("b", "d", "e"), ...)
NEC.4(fixed = c(NA, NA, NA, NA), names = c("b", "c", "d", "e"), ...)NECnec.m1 <- drm(rootl~conc, data=ryegrass, fct=NEC.4())
summary(nec.m1)
plot(nec.m1)Run the code above in your browser using DataLab