Negative exponential growth model
Computes the negative exponential growth model
y(t) = α * ( 1 - exp(-k * t))
negativeExponential(t, alpha, k) negativeExponential.inverse(x, alpha, k)
t |
time |
x |
size |
alpha |
upper asymptote |
k |
growth rate |
D. Fekedulegn, M. Mac Siurtain, and J. Colbert, "Parameter estimation of nonlinear growth models in forestry," Silva Fennica, vol. 33, no. 4, pp. 327-336, 1999.
growth <- negativeExponential(0:10, 1, 0.3) # Calculate inverse function time <- negativeExponential.inverse(growth, 10, 0.3)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.