dataset <- getAgroData("brassica")
model <- nls(FW ~ NLS.LL4(Dose, b, c, d, e), data = dataset)
model <- nls(FW ~ NLS.LL3(Dose, b, d, e), data = dataset)
model <- nls(FW/max(FW) ~ NLS.LL2(Dose, b, e), data = dataset)
summary(model)
Run the code above in your browser using DataLab