diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2020-04-04 16:46:37 +0200 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2020-04-04 16:46:37 +0200 |
| commit | 68f5f5c17e3e1c3f9272b9b663a4d7380433b530 (patch) | |
| tree | ca0c3837b1144368b67bb86a3192675f10212b97 /R/mkinsub.R | |
| parent | 8c19fc5261dc53dc7880b3f54f8f2adf413de996 (diff) | |
Add three functions to facilitate the use of nlme
Diffstat (limited to 'R/mkinsub.R')
| -rw-r--r-- | R/mkinsub.R | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/R/mkinsub.R b/R/mkinsub.R index db91ca00..f87c230a 100644 --- a/R/mkinsub.R +++ b/R/mkinsub.R @@ -27,11 +27,12 @@ #' parent = mkinsub("SFO", "m1"), #' m1 = mkinsub("SFO")) #' -#' # Now supplying full names -#' SFO_SFO.2 <- mkinmod( -#' parent = mkinsub("SFO", "m1", full_name = "Test compound"), -#' m1 = mkinsub("SFO", full_name = "Metabolite M1")) -#' +#' \dontrun{ +#' # Now supplying full names +#' SFO_SFO.2 <- mkinmod( +#' parent = mkinsub("SFO", "m1", full_name = "Test compound"), +#' m1 = mkinsub("SFO", full_name = "Metabolite M1")) +#' } #' @export mkinsub <- function(submodel, to = NULL, sink = TRUE, full_name = NA) { |