From 6c62c42eb57631aa0f4ab7e008621ffb519bd7be Mon Sep 17 00:00:00 2001
From: Johannes Ranke <jranke@uni-bremen.de>
Date: Tue, 23 Jun 2015 11:21:49 +0200
Subject: Small documenation changes

---
 man/IORE.solution.Rd | 16 +++++++++-------
 man/mkinfit.Rd       |  2 +-
 man/mkinparplot.Rd   |  4 ++--
 3 files changed, 12 insertions(+), 10 deletions(-)

(limited to 'man')

diff --git a/man/IORE.solution.Rd b/man/IORE.solution.Rd
index bb377d3f..bad7c1fa 100644
--- a/man/IORE.solution.Rd
+++ b/man/IORE.solution.Rd
@@ -30,12 +30,14 @@
   Media
 }
 \examples{
-  \dontrun{plot(function(x) IORE.solution(x, 100, 0.2, 1.3), 0, 2, 
-	                                  ylim = c(0, 100))}
-  m.fomc <- mkinfit("FOMC", FOCUS_2006_C, quiet = TRUE)
-  m.iore <- mkinfit("IORE", FOCUS_2006_C, quiet = TRUE)
-  m.iore.deS <- mkinfit("IORE", FOCUS_2006_C, solution_type = "deSolve", quiet = TRUE)
-  data.frame(coef(m.fomc), coef(m.iore), coef(m.iore.deS), row.names = paste("par", 1:3))
-  rbind(endpoints(m.fomc)$distimes, endpoints(m.iore)$distimes, endpoints(m.iore)$distimes)
+  plot(function(x) IORE.solution(x, 100, 0.2, 1.3), 0, 2, 
+	                               ylim = c(0, 100))
+  fit.fomc <- mkinfit("FOMC", FOCUS_2006_C, quiet = TRUE)
+  fit.iore <- mkinfit("IORE", FOCUS_2006_C, quiet = TRUE)
+  fit.iore.deS <- mkinfit("IORE", FOCUS_2006_C, solution_type = "deSolve", quiet = TRUE)
+
+  data.frame(coef(fit.fomc), coef(fit.iore), coef(fit.iore.deS), row.names = paste("model par", 1:3))
+  print(rbind(fomc = endpoints(m.fomc)$distimes, iore = endpoints(m.iore)$distimes, 
+              iore.deS = endpoints(m.iore)$distimes))
 }
 \keyword{ manip }
diff --git a/man/mkinfit.Rd b/man/mkinfit.Rd
index bf47879c..c6b6d601 100644
--- a/man/mkinfit.Rd
+++ b/man/mkinfit.Rd
@@ -247,7 +247,7 @@ print(system.time(fit <- mkinfit(SFO_SFO, FOCUS_2006_D,
 coef(fit)
 endpoints(fit)
 \dontrun{
-# deSolve is slower when the gcc compiler is not available
+# deSolve is slower when no C compiler (gcc) was available during model generation
 print(system.time(fit.deSolve <- mkinfit(SFO_SFO, FOCUS_2006_D, 
                            solution_type = "deSolve")))
 coef(fit.deSolve)
diff --git a/man/mkinparplot.Rd b/man/mkinparplot.Rd
index f40a96d1..3eda08d2 100644
--- a/man/mkinparplot.Rd
+++ b/man/mkinparplot.Rd
@@ -28,7 +28,7 @@ model <- mkinmod(
   T245 = list(type = "SFO", to = c("phenol"), sink = FALSE),
   phenol = list(type = "SFO", to = c("anisole")),
   anisole = list(type = "SFO"), use_of_ff = "max")
-fit <- mkinfit(model, subset(mccall81_245T, soil == "Commerce"))
-\dontrun{mkinparplot(fit)}
+fit <- mkinfit(model, subset(mccall81_245T, soil == "Commerce"), quiet = TRUE)
+mkinparplot(fit)
 }
 \keyword{ hplot }
-- 
cgit v1.2.1