auxins.m1 <- drm(y ~ dose, h, adjust = "bc1", pmodels = data.frame(h,
+ h, 1, h), fct = LL.4(), data = auxins)
auxins.m2 <- drm(y ~ dose, h, adjust = "bc1", pmodels = data.frame(h,
+ 1, 1, h), fct = LL.4(), data = auxins)
Run the code above in your browser using DataLab