powered by
Computes the Generalised Richard growth model and its inverse $$ y(t) = A + \frac{U - A}{(1 + \beta exp(-k (t - t_0)))^{(1/m)} }$$
generalisedRichard(t, A, U, k, m, beta, t0)generalisedRichard.inverse(x, A, U, k, m, beta, t0 = 0)
generalisedRichard.inverse(x, A, U, k, m, beta, t0 = 0)
time
the lower asymptote
the upper asymptote
growth range
slope of growth
time shift (default 0)
size
Daniel Rodriguez
http://en.wikipedia.org/wiki/Generalised_logistic_function
growth <- generalisedRichard(0:10, 5, 10, 0.3, 0.5, 1, 3) time <- generalisedRichard.inverse(growth, 5, 10, 0.3, 0.5, 1, 3)
Run the code above in your browser using DataLab