在R中运行latentnet软件包导致“Try-Error”结果

Question

我目前正在使用R中的latentnet包，这与ergm包非常相关。我在下面设置了以下内容，并继续收到Try-Error消息。

library(latentnet)
library(igraph)
library(intergraph)

pm <- matrix(rep(0, 100*100), ncol = 100)
diag(pm) <- rep(1, 100)
g <- sample_sbm(N, pref.matrix = pm, block.sizes = rep(1000/100,100))

set.seed(1)
X1 <- rbinom(1000, size = 1, prob = 0.5)      
X2 <- rgamma(1000, shape = 0.2, scale = 0.8) 
net.attributes <- data.frame(gender = as.character(X1), income = X2)
net.net <- asNetwork(netig)


> gest <- ergmm(net.net ~ euclidean(d=3,G=n.com), tofit="mcmc")
Error in if (inherits(EMloop, "try-error") || with(theta, max(Z.var)/min(Z.var)) >  : 
  missing value where TRUE/FALSE needed

我想知道这种错误通常是什么。我查看了文档Source Code，但不知道是什么导致它。有没有人有任何想法？谢谢