Working state, but not backwards compatible

In this commit, the separatation of plots for observed variables works.
The formatting should be improved.

However, in gmkin, plotting with show_residuals = TRUE is used, and the
GUI expects that the residual plot is below the main plot. This
behaviour should be restored.

1 files changed, 7 insertions, 1 deletions

diff --git a/man/mmkin.Rd b/man/mmkin.Rd
index f701890a..44caf8d2 100644
--- a/man/mmkin.Rd
+++ b/man/mmkin.Rd
@@ -56,13 +56,19 @@ m_synth_FOMC_lin <- mkinmod(parent = list(type = "FOMC", to = "M1"),
 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)
 
-time_default <- system.time(fits <- mmkin(models, datasets))
+time_default <- system.time(fits.0 <- mmkin(models, datasets))
 time_1 <- system.time(fits.1 <- mmkin(models, datasets, cores = 1))
 
 time_default
 time_1
 
 endpoints(fits[["SFO_lin", 2]])
+
+# Plot.mkinfit handles rows or columns of mmkin result objects
+plot(fits.0[1, ])
+# Double brackets to select a single mkinfit object, which will be
+# plotted by plot.mkinfit
+plot(fits.0[[1, 1]], sep_obs = TRUE, show_residuals = TRUE)
 }
 }
 \keyword{ optimize }