diff options
Diffstat (limited to 'R/plot.mkinfit.R')
| -rw-r--r-- | R/plot.mkinfit.R | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/R/plot.mkinfit.R b/R/plot.mkinfit.R index fc8ecf7..59ef861 100644 --- a/R/plot.mkinfit.R +++ b/R/plot.mkinfit.R @@ -30,9 +30,8 @@ plot.mkinfit <- function(x, fit = x, add = FALSE, legend = !add, ...) { solution_type = fit$solution_type - fixed <- fit$fixed$value - names(fixed) <- rownames(fit$fixed) - parms.all <- c(fit$parms.all, fixed) + parms.all <- c(fit$bparms.optim, fit$bparms.fixed) + ininames <- c( rownames(subset(fit$start, type == "state")), rownames(subset(fit$fixed, type == "state"))) |