ml3a(names = c("b", "d", "e", "f"), useDer = FALSE)
mlogistic
.ml3b
and ml3c
.## Modified logistic model
model1 <- multdrc(hormesis[,c(2,1)], fct=ml3a())
summary(model1)
ED(model1, c(50))
rm(model1)
Run the code above in your browser using DataLab