fix issue #83

daijiang · Nov 16, 2022 · ed42767 · ed42767
1 parent 08c288b
commit ed42767
Showing 1 changed file with 8 additions and 10 deletions.
diff --git a/R/pglmm-utils.R b/R/pglmm-utils.R
@@ -965,16 +965,14 @@ summary.communityPGLMM <- function(object, digits = max(3, getOption("digits") -
                 "WAIC" = unname(x$WAIC))
     print(logLik, digits = digits)
   } else {
-    if (x$family == "gaussian") {
-      logLik = x$logLik
-      AIC = x$AIC
-      BIC = x$BIC
-
-      names(logLik) = "logLik"
-      names(AIC) = "AIC"
-      names(BIC) = "BIC"
-      print(c(logLik, AIC, BIC), digits = digits)
-    }
+    logLik = x$logLik
+    AIC = x$AIC
+    BIC = x$BIC
+
+    names(logLik) = "logLik"
+    names(AIC) = "AIC"
+    names(BIC) = "BIC"
+    print(c(logLik, AIC, BIC), digits = digits)
   }
 
   if(grepl("zeroinflated", x$family)) {