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/mmkin.html | 36 +++++++++++++++++++++++++++--------- 1 file changed, 27 insertions(+), 9 deletions(-) (limited to 'docs/reference/mmkin.html') diff --git a/docs/reference/mmkin.html b/docs/reference/mmkin.html index af0b8f6f..3fa5c9a5 100644 --- a/docs/reference/mmkin.html +++ b/docs/reference/mmkin.html @@ -179,22 +179,40 @@

Examples

m_synth_SFO_lin <- mkinmod(parent = mkinsub("SFO", "M1"), M1 = mkinsub("SFO", "M2"), - M2 = mkinsub("SFO"), use_of_ff = "max")
#> Error in mkinmod(parent = mkinsub("SFO", "M1"), M1 = mkinsub("SFO", "M2"), M2 = mkinsub("SFO"), use_of_ff = "max"): konnte Funktion "mkinmod" nicht finden
+ M2 = mkinsub("SFO"), use_of_ff = "max")
#> Successfully compiled differential equation model from auto-generated C code.
m_synth_FOMC_lin <- mkinmod(parent = mkinsub("FOMC", "M1"), M1 = mkinsub("SFO", "M2"), - M2 = mkinsub("SFO"), use_of_ff = "max")
#> Error in mkinmod(parent = mkinsub("FOMC", "M1"), M1 = mkinsub("SFO", "M2"), M2 = mkinsub("SFO"), use_of_ff = "max"): konnte Funktion "mkinmod" nicht finden
-models <- list(SFO_lin = m_synth_SFO_lin, FOMC_lin = m_synth_FOMC_lin)
#> Error in eval(expr, envir, enclos): Objekt 'm_synth_SFO_lin' nicht gefunden
datasets <- lapply(synthetic_data_for_UBA_2014[1:3], function(x) x$data) + M2 = mkinsub("SFO"), use_of_ff = "max")
#> Successfully compiled differential equation model from auto-generated C code.
+models <- list(SFO_lin = m_synth_SFO_lin, FOMC_lin = m_synth_FOMC_lin) +datasets <- lapply(synthetic_data_for_UBA_2014[1:3], function(x) x$data) names(datasets) <- paste("Dataset", 1:3) -time_default <- system.time(fits.0 <- mmkin(models, datasets, quiet = TRUE))
#> Error in mmkin(models, datasets, quiet = TRUE): konnte Funktion "mmkin" nicht finden
#> Timing stopped at: 0 0 0
time_1 <- system.time(fits.4 <- mmkin(models, datasets, cores = 1, quiet = TRUE))
#> Error in mmkin(models, datasets, cores = 1, quiet = TRUE): konnte Funktion "mmkin" nicht finden
#> Timing stopped at: 0 0 0
-time_default
#> Error in eval(expr, envir, enclos): Objekt 'time_default' nicht gefunden
time_1
#> Error in eval(expr, envir, enclos): Objekt 'time_1' nicht gefunden
-endpoints(fits.0[["SFO_lin", 2]])
#> Error in endpoints(fits.0[["SFO_lin", 2]]): konnte Funktion "endpoints" nicht finden
+time_default <- system.time(fits.0 <- mmkin(models, datasets, quiet = TRUE)) +time_1 <- system.time(fits.4 <- mmkin(models, datasets, cores = 1, quiet = TRUE)) + +time_default
#> User System verstrichen +#> 0.045 0.036 7.264
time_1
#> User System verstrichen +#> 22.905 0.000 22.919
+endpoints(fits.0[["SFO_lin", 2]])
#> $ff +#> parent_M1 parent_sink M1_M2 M1_sink +#> 0.7340480 0.2659520 0.7505686 0.2494314 +#> +#> $SFORB +#> logical(0) +#> +#> $distimes +#> DT50 DT90 +#> parent 0.8777689 2.915885 +#> M1 2.3257453 7.725959 +#> M2 33.7200874 112.015706 +#>
# plot.mkinfit handles rows or columns of mmkin result objects -plot(fits.0[1, ])
#> Error in plot(fits.0[1, ]): Objekt 'fits.0' nicht gefunden
plot(fits.0[1, ], obs_var = c("M1", "M2"))
#> Error in plot(fits.0[1, ], obs_var = c("M1", "M2")): Objekt 'fits.0' nicht gefunden
plot(fits.0[, 1])
#> Error in plot(fits.0[, 1]): Objekt 'fits.0' nicht gefunden
# Use double brackets to extract a single mkinfit object, which will be plotted +plot(fits.0[1, ])
plot(fits.0[1, ], obs_var = c("M1", "M2"))
plot(fits.0[, 1])
# Use double brackets to extract a single mkinfit object, which will be plotted # by plot.mkinfit and can be plotted using plot_sep -plot(fits.0[[1, 1]], sep_obs = TRUE, show_residuals = TRUE, show_errmin = TRUE)
#> Error in plot(fits.0[[1, 1]], sep_obs = TRUE, show_residuals = TRUE, show_errmin = TRUE): Objekt 'fits.0' nicht gefunden
plot_sep(fits.0[[1, 1]])
#> Error in plot_sep(fits.0[[1, 1]]): konnte Funktion "plot_sep" nicht finden
# Plotting with mmkin (single brackets, extracting an mmkin object) does not +plot(fits.0[[1, 1]], sep_obs = TRUE, show_residuals = TRUE, show_errmin = TRUE)
plot_sep(fits.0[[1, 1]]) +# Plotting with mmkin (single brackets, extracting an mmkin object) does not # allow to plot the observed variables separately -plot(fits.0[1, 1])
#> Error in plot(fits.0[1, 1]): Objekt 'fits.0' nicht gefunden
+plot(fits.0[1, 1])