1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
|
\name{mkinmod}
\alias{mkinmod}
\title{
Function to set up a kinetic model with one or more state variables.
}
\description{
The function takes a specification, consisting of a list of the observed variables
in the data. Each observed variable is again represented by a list, specifying the
kinetic model type and reaction or transfer to other observed compartments.
}
\usage{
mkinmod(...)
}
\arguments{
\item{...}{
For each observed variable, a list has to be specified as an argument, containing
at least a component \code{type}, specifying the type of kinetics to use
for the variable. Currently, single first order kinetics "SFO" or
single first order with reversible binding "SFORB" are implemented for all
variables, while
"FOMC", "DFOP" and "HS" can additionally be chosen for the first
variable which is assumed to be the source compartment. Optional components
of each argument are \code{to}, a
vector of names of variables to which a transfer is to be assumed in the
model, and \code{sink}, a logical specifying if transformation to
unspecified compounds (sink) is to be assumed in the model (defaults to
\code{TRUE})
}
}
\value{
A list of class \code{mkinmod} for use with \code{\link{mkinfit}}, containing
\item{diffs}{ A vector of string representations of differential equations,
one for each modelling variable. }
\item{parms}{ A vector of parameter names occurring in the differential equations. }
\item{map}{ A list containing named character vectors for each observed variable, specifying
the modelling variables by which it is represented. }
\item{coefmat}{ The coefficient matrix, if the system of differential equations can be represented by one. }
}
\author{
Johannes Ranke <jranke@{harlan.com,uni-bremen.de}>
}
\examples{
# There are different ways to specify the SFO model
SFO.1 <- mkinmod(parent = list(type = "SFO", to = NULL, sink = TRUE))
SFO.2 <- mkinmod(parent = list(type = "SFO"))
all.equal(SFO.1, SFO.2)
# One parent compound, one metabolite, both single first order.
SFO_SFO <- mkinmod(
parent = list(type = "SFO", to = "m1", sink = TRUE),
m1 = list(type = "SFO"))
}
\keyword{ models }
|
