diff options
Diffstat (limited to 'R/mkinparplot.R')
| -rw-r--r-- | R/mkinparplot.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/mkinparplot.R b/R/mkinparplot.R index 53354db7..a5e8fb89 100644 --- a/R/mkinparplot.R +++ b/R/mkinparplot.R @@ -39,7 +39,7 @@ mkinparplot <- function(object) { for (type in names(n.plot)) { parnames <- get(type) values <- bpar[parnames] - values_with_confints <- data.frame(t(subset(data.frame(t(values)), !is.na(Lower)))) + values_with_confints <- data.frame(t(subset(data.frame(t(values)), !is.na("Lower")))) xlim = switch(type, state.optim = range(c(0, unlist(values)), na.rm = TRUE, finite = TRUE), |