aboutsummaryrefslogtreecommitdiff
path: root/man
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2014-11-13 07:47:54 +0100
committerJohannes Ranke <jranke@uni-bremen.de>2014-11-13 07:47:54 +0100
commitbb8244557f0ca2d4370bba5b799ffcdf9d822eb9 (patch)
tree0a5398a99c015f9ac7c4397361be51cd4a124f72 /man
parentbf857ec8adeadf1fa9387a38b2c7666f1ec3af7d (diff)
Expand the IORE example a bit
Diffstat (limited to 'man')
-rw-r--r--man/IORE.solution.Rd7
1 files changed, 4 insertions, 3 deletions
diff --git a/man/IORE.solution.Rd b/man/IORE.solution.Rd
index 15918776..3d827bdc 100644
--- a/man/IORE.solution.Rd
+++ b/man/IORE.solution.Rd
@@ -32,9 +32,10 @@
\examples{
\dontrun{plot(function(x) IORE.solution(x, 100, 0.2, 1.3), 0, 2,
ylim = c(0, 100))}
- m.iore <- mkinfit("IORE", FOCUS_2006_C, quiet = TRUE)
m.fomc <- mkinfit("FOMC", FOCUS_2006_C, quiet = TRUE)
- rbind(coef(m.iore), coef(m.fomc))
- rbind(endpoints(m.iore)$distimes, endpoints(m.fomc)$distimes)
+ 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)
}
\keyword{ manip }

Contact - Imprint