diff options
Diffstat (limited to 'R/mkinerrmin.R')
-rw-r--r-- | R/mkinerrmin.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/mkinerrmin.R b/R/mkinerrmin.R index 49538e37..8b1e9b2e 100644 --- a/R/mkinerrmin.R +++ b/R/mkinerrmin.R @@ -20,7 +20,7 @@ utils::globalVariables(c("name"))
mkinerrmin <- function(fit, alpha = 0.05)
{
- parms.optim <- fit$parms.all
+ parms.optim <- fit$par
kinerrmin <- function(errdata, n.parms) {
means.mean <- mean(errdata$value_mean, na.rm=TRUE)
df = length(errdata$value_mean) - n.parms
|