From ff7c70c3567087509952ac65fc3e17af1db75739 Mon Sep 17 00:00:00 2001
From: "Pavel N. Krivitsky" <p.krivitsky@unsw.edu.au>
Date: Fri, 29 Nov 2024 13:03:58 +1100
Subject: [PATCH] In ergm.stocapprox(), removed the conversion of MCMC sample
 to mcmc.list since ergm_MCMC_sample() already returns an mcmc.list object.

fixes statnet/ergm#585
---
 R/ergm.stocapprox.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/ergm.stocapprox.R b/R/ergm.stocapprox.R
index 9b33541fe..b644be101 100644
--- a/R/ergm.stocapprox.R
+++ b/R/ergm.stocapprox.R
@@ -79,7 +79,7 @@ ergm.stocapprox <- function(init, s, s.obs,
   if(verbose){message("Using Newton-Raphson Step ...")}
 
   v <- ergm.estimate(init=theta, model=model,
-                     statsmatrices=mcmc.list(as.mcmc(z$stats)),
+                     statsmatrices=z$stats,
                      statsmatrices.obs=NULL,
                      epsilon=control$epsilon,
                      nr.maxit=control$MCMLE.NR.maxit,