diff options
| -rw-r--r-- | R/mkinfit.R | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/R/mkinfit.R b/R/mkinfit.R index f0738ffc..6cfb88c0 100644 --- a/R/mkinfit.R +++ b/R/mkinfit.R @@ -587,6 +587,9 @@ mkinfit <- function(mkinmod, observed, out_long <- mkin_wide_to_long(out, time = "time") + # Surprisingly, the next line is the one taking the most time for one, two + # or three observed variables if we use compiled ODE models + # as evidenced by use of github:hadley/lineprof cost_data <- merge(observed[c("name", "time", "value")], out_long, by = c("name", "time"), suffixes = c(".observed", ".predicted")) |