aboutsummaryrefslogtreecommitdiff
path: root/man/nlme.mmkin.Rd
diff options
context:
space:
mode:
Diffstat (limited to 'man/nlme.mmkin.Rd')
-rw-r--r--man/nlme.mmkin.Rd72
1 files changed, 72 insertions, 0 deletions
diff --git a/man/nlme.mmkin.Rd b/man/nlme.mmkin.Rd
new file mode 100644
index 00000000..5f937488
--- /dev/null
+++ b/man/nlme.mmkin.Rd
@@ -0,0 +1,72 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/nlme.mmkin.R
+\name{nlme.mmkin}
+\alias{nlme.mmkin}
+\title{Create an nlme model for an mmkin row object}
+\usage{
+\method{nlme}{mmkin}(
+ model,
+ data = sys.frame(sys.parent()),
+ fixed,
+ random = fixed,
+ groups,
+ start,
+ correlation = NULL,
+ weights = NULL,
+ subset,
+ method = c("ML", "REML"),
+ na.action = na.fail,
+ naPattern,
+ control = list(),
+ verbose = FALSE
+)
+}
+\arguments{
+\item{model}{An \code{\link{mmkin}} row object.}
+
+\item{data}{Ignored, data are taken from the mmkin model}
+
+\item{fixed}{Ignored, all degradation parameters fitted in the
+mmkin model are used as fixed parameters}
+
+\item{random}{If not specified, all fixed effects are complemented
+with uncorrelated random effects}
+
+\item{groups}{See the documentation of nlme}
+
+\item{start}{If not specified, mean values of the fitted degradation
+parameters taken from the mmkin object are used}
+
+\item{correlation}{See the documentation of nlme}
+
+\item{weights}{passed to nlme}
+
+\item{subset}{passed to nlme}
+
+\item{method}{passed to nlme}
+
+\item{na.action}{passed to nlme}
+
+\item{naPattern}{passed to nlme}
+
+\item{control}{passed to nlme}
+
+\item{verbose}{passed to nlme}
+}
+\value{
+Upon success, a fitted nlme.mmkin object, which is
+ an nlme object with additional elements
+}
+\description{
+Create an nlme model for an mmkin row object
+}
+\examples{
+ds <- lapply(experimental_data_for_UBA_2019[6:10],
+ function(x) subset(x$data[c("name", "time", "value")], name == "parent"))
+f <- mmkin("SFO", ds, quiet = TRUE, cores = 1)
+library(nlme)
+f_nlme <- nlme(f)
+nlme(f, random = parent_0 ~ 1)
+f_nlme <- nlme(f, start = c(parent_0 = 100, log_k_parent_sink = 0.1))
+update(f_nlme, random = parent_0 ~ 1)
+}

Contact - Imprint