Calculate a logistic ogive with a maximum asymptote less than 1.
Usage
logistic_capped_ogive(x, x50, x95, xmax)
Arguments
- x
a numeric vector of length bin midpoints (mm).
- x50
the size at 50% of the maximum value (mm).
- x95
the difference between x95 and x50, where x95 is the size at 95% of maximum (mm).
- xmax
the maximum asymptotic value (between 0 and 1).
Value
a numeric vector of ogive values between 0 and xmax.
Examples
x <- seq(31, 91, 0.1)
y <- logistic_capped_ogive(x = x, x50 = 50, x95 = 1, xmax = 15)
plot(x, y, type = "b")