diff options
| author | Johannes Ranke <johannes.ranke@jrwb.de> | 2025-11-28 09:20:07 +0100 |
|---|---|---|
| committer | Johannes Ranke <johannes.ranke@jrwb.de> | 2025-11-28 09:20:07 +0100 |
| commit | fe411af3dbed474d9e5b3cc1d509f66bd76f7319 (patch) | |
| tree | 8b1a3a355c0aa6e0a59ec192e315e96c99640ff2 /R/D24_2014.R | |
| parent | a5a73e8d76faff5983399386de571431e8824636 (diff) | |
Example evaluation of D24_2014, improve docs
Diffstat (limited to 'R/D24_2014.R')
| -rw-r--r-- | R/D24_2014.R | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/R/D24_2014.R b/R/D24_2014.R index aaed029c..973cf47d 100644 --- a/R/D24_2014.R +++ b/R/D24_2014.R @@ -33,5 +33,15 @@ #' DCP = mkinsub("SFO", to = "DCA"), #' DCA = mkinsub("SFO")) #' print(m_D24_2) +#' D24_2014_data <- lapply(D24_2014$ds, function(x) x$data) +#' names(D24_2014_data) <- sapply(D24_2014$ds, function(x) x$title) +#' f_D24_2014 <- mmkin( +#' models = list( +#' "SFO-SFO-SFO" = m_D24, +#' "DFOP-SFO-SFO" = m_D24_2), +#' data = D24_2014_data, +#' quiet = TRUE) +#' print(f_D24_2014) +#' plot(f_D24_2014[, 3]) #' } "D24_2014" |