Function describing exponential decline from a defined starting value, with a concentration dependent rate constant.

IORE.solution(t, parent.0, k__iore, N)

Arguments

t

Time.

parent.0

Starting value for the response variable at time zero.

k__iore

Rate constant. Note that this depends on the concentration units used.

N

Exponent describing the nonlinearity of the rate equation

Note

The solution of the IORE kinetic model reduces to the SFO.solution if N = 1. The parameters of the IORE model can be transformed to equivalent parameters of the FOMC mode - see the NAFTA guidance for details.

Value

The value of the response variable at time t.

References

NAFTA Technical Working Group on Pesticides (not dated) Guidance for Evaluating and Calculating Degradation Kinetics in Environmental Media

Examples

plot(function(x) IORE.solution(x, 100, 0.2, 1.3), 0, 2, ylim = c(0, 100))
#> Error in IORE.solution(x, 100, 0.2, 1.3): konnte Funktion "IORE.solution" nicht finden
fit.fomc <- mkinfit("FOMC", FOCUS_2006_C, quiet = TRUE)
#> Error in mkinfit("FOMC", FOCUS_2006_C, quiet = TRUE): konnte Funktion "mkinfit" nicht finden
fit.iore <- mkinfit("IORE", FOCUS_2006_C, quiet = TRUE)
#> Error in mkinfit("IORE", FOCUS_2006_C, quiet = TRUE): konnte Funktion "mkinfit" nicht finden
fit.iore.deS <- mkinfit("IORE", FOCUS_2006_C, solution_type = "deSolve", quiet = TRUE)
#> Error in mkinfit("IORE", FOCUS_2006_C, solution_type = "deSolve", quiet = TRUE): konnte Funktion "mkinfit" nicht finden
print(data.frame(coef(fit.fomc), coef(fit.iore), coef(fit.iore.deS), row.names = paste("model par", 1:3)))
#> Error in coef(fit.fomc): Objekt 'fit.fomc' nicht gefunden
print(rbind(fomc = endpoints(fit.fomc)$distimes, iore = endpoints(fit.iore)$distimes, iore.deS = endpoints(fit.iore)$distimes))
#> Error in endpoints(fit.fomc): konnte Funktion "endpoints" nicht finden