diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2020-10-26 14:23:04 +0100 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2020-10-26 14:23:04 +0100 |
commit | b81cd4b32c8411637f31164cc696a471b1074baa (patch) | |
tree | 6da1066ff09111710a32ec98f3f156f532e3db4b /R/nlme.mmkin.R | |
parent | 9bfc85d605ae54623f63b7e3cdb36f5ac64876c1 (diff) |
Put the legend in its own area for plot.nlme.mmkin
Diffstat (limited to 'R/nlme.mmkin.R')
-rw-r--r-- | R/nlme.mmkin.R | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/R/nlme.mmkin.R b/R/nlme.mmkin.R index 22a70f18..d3369cf5 100644 --- a/R/nlme.mmkin.R +++ b/R/nlme.mmkin.R @@ -55,6 +55,7 @@ get_deg_func <- function() { #' print(f_nlme_dfop) #' plot(f_nlme_dfop) #' endpoints(f_nlme_dfop) +#' #' \dontrun{ #' f_nlme_2 <- nlme(f["SFO", ], start = c(parent_0 = 100, log_k_parent = 0.1)) #' update(f_nlme_2, random = parent_0 ~ 1) @@ -101,6 +102,7 @@ get_deg_func <- function() { #' AIC(f_nlme_sfo, f_nlme_sfo_tc, f_nlme_dfop, f_nlme_dfop_tc) #' print(f_nlme_dfop_tc) #' } +#' #' f_2_obs <- mmkin(list("SFO-SFO" = m_sfo_sfo, #' "DFOP-SFO" = m_dfop_sfo), #' ds_2, quiet = TRUE, error_model = "obs") |