Retrieves the MCMC sweep results from an sbm_network object. Needs to have
mcmc_sweep run on the object before.
get_sweep_results(sbm)
| sbm | Object of class |
|---|
MCMC sweep results from an sbm_network object
Other helpers:
build_score_fn(),
get_combination_indices(),
get_sweep_pair_counts(),
print.sbm_network(),
rolling_mean(),
verify_model()
# Start with a small random network net <- sim_basic_block_network(n_blocks = 3, n_nodes_per_block = 15) %>% initialize_blocks(num_blocks = 4) %>% mcmc_sweep(num_sweeps = 4, variable_num_blocks = FALSE) # Retrieve the sweep results from network get_sweep_results(net)#> $nodes_moved #> [1] "g1_10" "g2_11" "g2_1" "g2_13" "g3_3" "g1_14" "g2_2" "g1_12" "g3_12" #> [10] "g1_8" "g2_14" "g3_8" "g2_8" "g1_2" "g1_4" "g3_1" "g2_15" "g1_1" #> [19] "g2_4" "g3_2" "g1_5" "g1_15" "g1_15" "g2_15" "g1_7" "g2_5" "g1_1" #> [28] "g2_12" "g2_1" "g2_3" "g2_14" "g3_7" "g2_10" "g3_2" "g3_3" "g1_8" #> [37] "g1_2" "g1_4" "g3_5" "g1_6" "g1_13" "g1_3" "g1_9" "g3_6" "g2_11" #> [46] "g3_9" "g2_4" "g3_9" "g3_4" "g3_1" "g1_9" "g2_13" "g3_5" "g1_15" #> [55] "g1_3" "g3_7" "g1_1" "g2_14" "g2_4" "g2_8" "g2_10" "g2_11" "g1_4" #> [64] "g3_11" "g2_3" "g2_12" "g2_7" "g1_15" "g1_4" "g3_7" "g2_5" "g1_5" #> [73] "g3_5" "g1_12" "g1_11" "g3_4" "g3_2" "g3_6" "g1_2" "g2_13" "g1_1" #> [82] "g1_8" #> #> $sweep_info #> entropy_delta num_nodes_moved #> 1 -1.1917674 22 #> 2 -4.9070218 25 #> 3 -0.7144661 18 #> 4 1.3216878 17 #>