aboutsummaryrefslogtreecommitdiff
path: root/man/logistic.solution.Rd
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2019-02-22 09:46:39 +0100
committerJohannes Ranke <jranke@uni-bremen.de>2019-02-22 09:46:39 +0100
commit39d5dc6988389f026d5165cac208ec63d0645a77 (patch)
tree9ad604208a70d9ff01fd3e77febbe3a7080dee06 /man/logistic.solution.Rd
parent5181a55b1619c153b690db97ee82698bf76525ff (diff)
Further adaptations for the logistic model
- Make mmkin compatible - Return DT50 values corresponding to k0 and kmax - Turn incompatible parameter names in parms.ini from an error to a warning, in order to make it possible to use this argument in calls to mmkin
Diffstat (limited to 'man/logistic.solution.Rd')
-rw-r--r--man/logistic.solution.Rd7
1 files changed, 4 insertions, 3 deletions
diff --git a/man/logistic.solution.Rd b/man/logistic.solution.Rd
index 67e60983..05b6c0aa 100644
--- a/man/logistic.solution.Rd
+++ b/man/logistic.solution.Rd
@@ -2,7 +2,7 @@
\alias{logistic.solution}
\title{ Logistic kinetics }
\description{
- Function describing exponential decline from a defined starting value, with
+ Function describing exponential decline from a defined starting value, with
an increasing rate constant, supposedly caused by microbial growth
}
\usage{
@@ -28,11 +28,11 @@ logistic.solution(t, parent.0, kmax, k0, r)
Degradation Kinetics from Environmental Fate Studies on Pesticides in EU
Registration} Report of the FOCUS Work Group on Degradation Kinetics,
Version 1.1, 18 December 2014
- \url{http://esdac.jrc.ec.europa.eu/projects/degradation-kinetics}
+ \url{http://esdac.jrc.ec.europa.eu/projects/degradation-kinetics}
}
\examples{
# Reproduce the plot on page 57 of FOCUS (2014)
- plot(function(x) logistic.solution(x, 100, 0.08, 0.0001, 0.2),
+ plot(function(x) logistic.solution(x, 100, 0.08, 0.0001, 0.2),
from = 0, to = 100, ylim = c(0, 100),
xlab = "Time", ylab = "Residue")
plot(function(x) logistic.solution(x, 100, 0.08, 0.0001, 0.4),
@@ -63,5 +63,6 @@ logistic.solution(t, parent.0, kmax, k0, r)
m <- mkinfit("logistic", d_2_1, quiet = TRUE)
plot_sep(m)
summary(m)$bpar
+ endpoints(m)$distimes
}
\keyword{ manip }

Contact - Imprint