From 833d0fa6b5b4c0495e34d96709c3faf11ab4b0ee Mon Sep 17 00:00:00 2001
From: Johannes Ranke <jranke@uni-bremen.de>
Date: Wed, 30 Apr 2014 16:13:13 +0200
Subject: Fix of bug introduced with t-test
---
R/mkinfit.R | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
(limited to 'R')
diff --git a/R/mkinfit.R b/R/mkinfit.R
index d3edd2fb..f44c67d7 100644
--- a/R/mkinfit.R
+++ b/R/mkinfit.R
@@ -332,7 +332,7 @@ summary.mkinfit <- function(object, data = TRUE, distimes = TRUE, alpha = 0.05,
resvar <- object$ssr / rdf
if (!is.numeric(covar)) {
covar <- NULL
- se <- lci <- uci <- rep(NA, p)
+ se <- lci <- uci <- tval <- pval1 <- pval2 <- rep(NA, p)
} else {
rownames(covar) <- colnames(covar) <- pnames
se <- sqrt(diag(covar) * resvar)
--
cgit v1.2.1