diff --git a/DESCRIPTION b/DESCRIPTION index 85927bc..d9a2f00 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,5 +1,5 @@ Package: ergm.ego -Version: 1.0-669 +Version: 1.0-670 Date: 2022-04-09 Title: Fit, Simulate and Diagnose Exponential-Family Random Graph Models to Egocentrically Sampled Network Data Authors@R: c( @@ -12,7 +12,7 @@ Authors@R: c( person("Chad", "Klumb", role=c("ctb"), email="cklumb@gmail.com")) Depends: R (>= 2.10), - ergm (>= 4.0.0), + ergm (>= 4.2.0), egor, network (>= 1.17.1) LinkingTo: ergm diff --git a/R/ergm.ego.R b/R/ergm.ego.R index 3018049..fbb1f44 100644 --- a/R/ergm.ego.R +++ b/R/ergm.ego.R @@ -260,8 +260,6 @@ ergm.ego <- function(formula, popsize=1, offset.coef=NULL, constraints=~.,..., c out <- list(v=v, m=m, formula=formula, ergm.formula=ergm.formula, offset.coef=offset.coef, ergm.offset.coef=ergm.offset.coef, egor=egor, ppopsize=ppopsize, popsize=popsize, constraints=constraints, netsize.adj=if(nsa) adj.update, call=ergm.ego_call) if(do.fit){ - control$ergm$force.main <- TRUE - ergm.fit <- ergm(ergm.formula, target.stats=m, offset.coef=ergm.offset.coef, constraints=constraints, ..., eval.loglik=FALSE,control=control$ergm) if(is.curved(ergm.fit)) warning("Theory of egocentric inference and particularly of variance calculation for curved ERGMs is not well understood; standard errors might not be reliable.")