From 4ab7a4646a57831e73d744ff0827a91e18e4981d Mon Sep 17 00:00:00 2001
From: Julian Sagebiel <julian.sagebiel@idiv.de>
Date: Fri, 18 Oct 2024 11:19:09 +0200
Subject: [PATCH] quicktexregapollo works again
---
R/quicktexregapollo.R | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/R/quicktexregapollo.R b/R/quicktexregapollo.R
index dc49283..740fb75 100644
--- a/R/quicktexregapollo.R
+++ b/R/quicktexregapollo.R
@@ -54,7 +54,8 @@ quicktexregapollo <- function(model = model, wtpest = NULL, se="rob") {
}
-
+ coefnames <- rownames(estimated)
+
texout <- texreg::createTexreg(coef.names = coefnames , coef = estimated[["estimate"]] , se = estimated[["se"]] , pvalues = estimated$pv,
gof.names = c("No Observations" , "No Respondents" , "Log Likelihood (Null)" , "Log Likelihood (Converged)") ,
gof = c(model[["nObsTot"]] , model[["nIndivs"]], model[["LL0"]][[1]] , model[["LLout"]][[1]] ) ,
--
GitLab