From fe411af3dbed474d9e5b3cc1d509f66bd76f7319 Mon Sep 17 00:00:00 2001
From: Johannes Ranke <johannes.ranke@jrwb.de>
Date: Fri, 28 Nov 2025 09:20:07 +0100
Subject: Example evaluation of D24_2014, improve docs

---
 man/D24_2014.Rd | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'man/D24_2014.Rd')

diff --git a/man/D24_2014.Rd b/man/D24_2014.Rd
index d555d348..59ea5a9e 100644
--- a/man/D24_2014.Rd
+++ b/man/D24_2014.Rd
@@ -46,6 +46,16 @@ m_D24_2 = mkinmod(D24 = mkinsub("DFOP", to = "DCP"),
   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])
 }
 }
 \keyword{datasets}
-- 
cgit v1.2.3