CRS.5a(names = c("b", "c", "d", "e", "f"), ...)
UCRS.5a(names = c("b", "c", "d", "e", "f"), ...)
cedergreen
.LL.4
).
The models denoted a,b,c are obtained by fixing the alpha parameter at 1, 0.5 and 0.25, respectively.cedergreen
.CRS.4a
and UCRS.4a
, but with the
lower limit (the parameter $c$) fixed at 0 (one parameter less to be estimated).## Modified logistic model
lettuce.m1 <- drm(lettuce[,c(2,1)], fct=CRS.5a())
summary(lettuce.m1)
ED(lettuce.m1, c(50))
lettuce.m2 <- drm(lettuce[,c(2,1)], fct=CRS.5b())
summary(lettuce.m2)
ED(lettuce.m2, c(50))
lettuce.m3 <- drm(lettuce[,c(2,1)], fct=CRS.5c())
summary(lettuce.m3)
ED(lettuce.m3, c(50))
Run the code above in your browser using DataLab