diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2020-05-18 12:11:13 +0200 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2020-05-18 12:11:13 +0200 |
| commit | f345762ddcdac65b0d565c7a622d32c1f849e7c7 (patch) | |
| tree | f31a18bb042bb73d0fb7a8fe9a38b08621f8a4a5 | |
| parent | da33f5c04ab9d98cad0b3ef5ab9f173f612f14ef (diff) | |
Add comment
| -rw-r--r-- | R/mkinpredict.R | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/R/mkinpredict.R b/R/mkinpredict.R index 938d3488..350ee56a 100644 --- a/R/mkinpredict.R +++ b/R/mkinpredict.R @@ -138,7 +138,8 @@ mkinpredict.mkinmod <- function(x, out_obs[, "time"] <- outtimes if (solution_type == "analytical") { - # This is clumsy, as we wanted fast analytical predictions for mkinfit + # This is clumsy, as we wanted fast analytical predictions for mkinfit, + # which bypasses mkinpredict in the case of analytical solutions pseudo_observed <- data.frame(name = rep(obs_vars, each = length(outtimes)), time = rep(outtimes, length(obs_vars))) |