schnute {growthmodels}

Schnute growth model

Description

Computes the Schnute growth model

y(t) = \left[ r_0 + \beta exp(k t) \right]^m

Usage

schnute(t, r0, beta, k, m)

schnute.inverse(x, r0, beta, k, m)

Arguments

t

time

r0

reference value

beta

growth displacement

k

growth rate

m

slope of growth

x

size

Author(s)

Daniel Rodriguez

References

A. Khamiz, Z. Ismail, and A. T. Muhammad, "Nonlinear growth models for modeling oil palm yield growth," Journal of Mathematics and Statistics, vol. 1, no. 3, p. 225, 2005.

Examples

growth <- schnute(0:10, 10, 5, .5, .5)

# Calculate inverse function
time <- schnute.inverse(growth, 10, 5, .5, .5)