Plot time series of decline data

# S3 method for one_box
plot(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

x The object of type one_box to be plotted Limits for the x axis Limits for the y axis Label for the x axis Label for the y axis If a numeric value is given, the maximum time weighted average concentration(s) is/are shown in the graph. Variable for which the maximum time weighted average should be shown if max_twa is not NULL. Further arguments passed to methods

sawtooth
dfop_pred <- one_box("DFOP", parms = c(k1 = 0.2, k2 = 0.02, g = 0.7))
plot(pred_2_saw, max_twa = 21, max_twa_var = "m1")