aboutsummaryrefslogtreecommitdiff
path: root/R/FOMC.solution.R
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2020-05-07 08:59:29 +0200
committerJohannes Ranke <jranke@uni-bremen.de>2020-05-07 08:59:29 +0200
commit8bdb4cd437a9d4663e542f95869e8692aa38dadb (patch)
tree2844662f8b143547d9abc8f16264407582367ad9 /R/FOMC.solution.R
parent1195dfc8bdbf7c131d6c6ec30fedbbe746af1bee (diff)
Static documentation rebuilt by pkgdown
Diffstat (limited to 'R/FOMC.solution.R')
-rw-r--r--R/FOMC.solution.R36
1 files changed, 0 insertions, 36 deletions
diff --git a/R/FOMC.solution.R b/R/FOMC.solution.R
deleted file mode 100644
index f5e6a7ea..00000000
--- a/R/FOMC.solution.R
+++ /dev/null
@@ -1,36 +0,0 @@
-#' First-Order Multi-Compartment kinetics
-#'
-#' Function describing exponential decline from a defined starting value, with
-#' a decreasing rate constant.
-#'
-#' The form given here differs slightly from the original reference by
-#' Gustafson and Holden (1990). The parameter \code{beta} corresponds to 1/beta
-#' in the original equation.
-#'
-#' @param t Time.
-#' @param parent.0 Starting value for the response variable at time zero.
-#' @param alpha Shape parameter determined by coefficient of variation of rate
-#' constant values.
-#' @param beta Location parameter.
-#' @return The value of the response variable at time \code{t}.
-#' @note The solution of the FOMC kinetic model reduces to the
-#' \code{\link{SFO.solution}} for large values of \code{alpha} and
-#' \code{beta} with \eqn{k = \frac{\beta}{\alpha}}{k = beta/alpha}.
-#' @references FOCUS (2006) \dQuote{Guidance Document on Estimating Persistence
-#' and Degradation Kinetics from Environmental Fate Studies on Pesticides in
-#' EU Registration} Report of the FOCUS Work Group on Degradation Kinetics,
-#' EC Document Reference Sanco/10058/2005 version 2.0, 434 pp,
-#' \url{http://esdac.jrc.ec.europa.eu/projects/degradation-kinetics}
-#'
-#' Gustafson DI and Holden LR (1990) Nonlinear pesticide dissipation in soil:
-#' A new model based on spatial variability. \emph{Environmental Science and
-#' Technology} \bold{24}, 1032-1038
-#' @examples
-#'
-#' plot(function(x) FOMC.solution(x, 100, 10, 2), 0, 2, ylim = c(0, 100))
-#'
-#' @export
-FOMC.solution <- function(t, parent.0, alpha, beta)
-{
- parent = parent.0 / (t/beta + 1)^alpha
-}

Contact - Imprint