aboutsummaryrefslogblamecommitdiff
path: root/man/plot.one_box.Rd
blob: a212c1196c3606f0e8855a9eed2010b0c6e1d116 (plain) (tree)
1
2
3
4
5
6
7
8






                                                                     
                                                  
























                                                                              






                                                                     
                                 

                                                  


                      
 
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/twa.R
\name{plot.one_box}
\alias{plot.one_box}
\title{Plot time series of decline data}
\usage{
\method{plot}{one_box}(x, xlim = range(time(x)), ylim = c(0, max(x)),
  xlab = "Time", ylab = "Residue", max_twa = NULL,
  max_twa_var = dimnames(x)[[2]][1], ...)
}
\arguments{
\item{x}{The object of type \code{\link{one_box}} to be plotted}

\item{xlim}{Limits for the x axis}

\item{ylim}{Limits for the y axis}

\item{xlab}{Label for the x axis}

\item{ylab}{Label for the y axis}

\item{max_twa}{If a numeric value is given, the maximum time weighted
average concentration(s) is/are shown in the graph.}

\item{max_twa_var}{Variable for which the maximum time weighted average should
be shown if max_twa is not NULL.}

\item{...}{Further arguments passed to methods}
}
\description{
Plot time series of decline data
}
\examples{
dfop_pred <- one_box("DFOP", parms = c(k1 = 0.2, k2 = 0.02, g = 0.7))
plot(dfop_pred)
plot(sawtooth(dfop_pred, 3, 7), max_twa = 21)

# Use a fitted mkinfit model
m_2 <- mkinmod(parent = mkinsub("SFO", "m1"), m1 = mkinsub("SFO"))
fit_2 <- mkinfit(m_2, FOCUS_2006_D, quiet = TRUE)
pred_2 <- one_box(fit_2, ini = 1)
pred_2_saw <- sawtooth(pred_2, 2, 7)
plot(pred_2_saw, max_twa = 21, max_twa_var = "m1")
}
\seealso{
\code{\link{sawtooth}}
}

Contact - Imprint