From 3eefecf0adfbb30b8fb895c244dea6903bcb3e9c Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Thu, 31 Jan 2019 16:55:20 +0100 Subject: Restore NAMESPACE which was accidentally overwritten by pkgdown -> roxygen --- docs/reference/IORE.solution.html | 15 ++++++++++++--- 1 file changed, 12 insertions(+), 3 deletions(-) (limited to 'docs/reference/IORE.solution.html') diff --git a/docs/reference/IORE.solution.html b/docs/reference/IORE.solution.html index 5bc5a57d..2ad38a16 100644 --- a/docs/reference/IORE.solution.html +++ b/docs/reference/IORE.solution.html @@ -174,10 +174,19 @@

Examples

plot(function(x) IORE.solution(x, 100, 0.2, 1.3), 0, 2, - ylim = c(0, 100))
#> Error in IORE.solution(x, 100, 0.2, 1.3): konnte Funktion "IORE.solution" nicht finden
fit.fomc <- mkinfit("FOMC", FOCUS_2006_C, quiet = TRUE)
#> Error in mkinfit("FOMC", FOCUS_2006_C, quiet = TRUE): konnte Funktion "mkinfit" nicht finden
fit.iore <- mkinfit("IORE", FOCUS_2006_C, quiet = TRUE)
#> Error in mkinfit("IORE", FOCUS_2006_C, quiet = TRUE): konnte Funktion "mkinfit" nicht finden
fit.iore.deS <- mkinfit("IORE", FOCUS_2006_C, solution_type = "deSolve", quiet = TRUE)
#> Error in mkinfit("IORE", FOCUS_2006_C, solution_type = "deSolve", quiet = TRUE): konnte Funktion "mkinfit" nicht finden
+ 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) + print(data.frame(coef(fit.fomc), coef(fit.iore), coef(fit.iore.deS), - row.names = paste("model par", 1:3)))
#> Error in coef(fit.fomc): Objekt 'fit.fomc' nicht gefunden
print(rbind(fomc = endpoints(fit.fomc)$distimes, iore = endpoints(fit.iore)$distimes, - iore.deS = endpoints(fit.iore)$distimes))
#> Error in endpoints(fit.fomc): konnte Funktion "endpoints" nicht finden
+ row.names = paste("model par", 1:3)))
#> coef.fit.fomc. coef.fit.iore. coef.fit.iore.deS. +#> model par 1 85.87489063 85.874890 85.874890 +#> model par 2 0.05192238 -4.826631 -4.826631 +#> model par 3 0.65096665 1.949403 1.949403
print(rbind(fomc = endpoints(fit.fomc)$distimes, iore = endpoints(fit.iore)$distimes, + iore.deS = endpoints(fit.iore)$distimes))
#> DT50 DT90 DT50back +#> fomc 1.785233 15.1479 4.559973 +#> iore 1.785233 15.1479 4.559973 +#> iore.deS 1.785233 15.1479 4.559973