Fixed naming for esp and dsp gof() effects for directed networks.

Author: krivit

DESCRIPTION

@@ -1,5 +1,5 @@
 Package: ergm
-Version: 4.12.1-7995
+Version: 4.12.1-7996
 Date: 2026-02-24
 Title: Fit, Simulate and Diagnose Exponential-Family Models for Networks
 Authors@R: c(

R/gof.ergm.R

@@ -654,15 +654,15 @@ InitErgmTerm..gof.espart <- function(nw, arglist, ..., cache.sp = TRUE) {
   arglist <- list(0:(network.size(nw) - 2))
   f <- InitErgmTerm.esp
   term <- f(nw, arglist, ..., cache.sp = cache.sp)
-  term$coef.names <- gsub("^esp", ".gof.espart#", term$coef.names)
+  term$coef.names <- gsub("^esp(\\.[A-Z]{3})?", ".gof.espart#", term$coef.names)
   term
 }
 
 InitErgmTerm..gof.dspart <- function(nw, arglist, ..., cache.sp = TRUE) {
   arglist <- list(0:(network.size(nw) - 2))
   f <- InitErgmTerm.dsp
   term <- f(nw, arglist, ..., cache.sp = cache.sp)
-  term$coef.names <- gsub("^dsp", ".gof.dspart#", term$coef.names)
+  term$coef.names <- gsub("^dsp(\\.[A-Z]{3})?", ".gof.dspart#", term$coef.names)
   term
 }