## Fitting the Boltzmann model
m1 <- multdrc(ryegrass, fct = boltzmann())
summary(m1)
## Fitting an asymmetric Boltzmann model
## requires installing the package 'NISTnls'
# m2 <- drm(y~x, data = Ratkowsky3,
# fct = b5(fixed = c(NA, 0, NA, NA, NA)))
# plot(m2)
# summary(m2)
## okay agreement with NIST values
## for the two parameters that are the same
Run the code above in your browser using DataLab