inst/tinytest/test-ergmito_surface.R

set.seed(1)
net <- rbernoulli(rep(5, 5))
ans <- ergmito(net ~ edges + mutual)

expect_silent(plot(ans))
  
USCCANA/lergm documentation built on April 13, 2025, 8:46 p.m.