From 518a801a9a0f1aef36df1f201b6a3f0f3a84b779 Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Sat, 18 Apr 2020 00:38:26 +0200 Subject: Avoid assignment to .GlobalEnv for CRAN --- R/summary.mkinfit.R | 12 +++++------- 1 file changed, 5 insertions(+), 7 deletions(-) (limited to 'R/summary.mkinfit.R') 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 -- cgit v1.2.1