diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2020-04-18 00:38:26 +0200 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2020-04-18 00:38:26 +0200 |
| commit | 518a801a9a0f1aef36df1f201b6a3f0f3a84b779 (patch) | |
| tree | 0e3bcbdc0f50df02c4249f49d52c65bd2537ed4b /R/summary.mkinfit.R | |
| parent | 49ecddeab52babb7388990b5dd0e15acd70c8b43 (diff) | |
Avoid assignment to .GlobalEnv for CRAN
Diffstat (limited to 'R/summary.mkinfit.R')
| -rw-r--r-- | R/summary.mkinfit.R | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/R/summary.mkinfit.R b/R/summary.mkinfit.R index a67f17ee..2dc74bd7 100644 --- a/R/summary.mkinfit.R +++ b/R/summary.mkinfit.R @@ -138,13 +138,11 @@ summary.mkinfit <- function(object, data = TRUE, distimes = TRUE, alpha = 0.05, if (!is.null(object$version)) { ans$fit_version <- object$version ans$fit_Rversion <- object$Rversion - } - - AIC <- try(AIC(object)) - if (!inherits(AIC, "try-error")) { - ans$AIC = AIC(object) - ans$BIC = BIC(object) - ans$logLik = logLik(object) + if (ans$fit_version >= "0.9.49.6") { + ans$AIC = AIC(object) + ans$BIC = BIC(object) + ans$logLik = logLik(object) + } } ans$diffs <- object$mkinmod$diffs |