mlvsbm_simulate_network {MLVSBM}

Create a simulated multilevel network (MLVSBM object)

Description

Create a simulated multilevel network (MLVSBM object)

Usage

mlvsbm_simulate_network(
  n,
  Q,
  pi,
  gamma,
  alpha,
  directed,
  affiliation = "uniform",
  distribution = list("bernoulli", "bernoulli"),
  no_empty_org = FALSE,
  no_isolated_node = FALSE
)

Arguments

n

A list of 2 positive integers, the number of individuals and organizations.

Q

A list of 2 positive integers, the number of clusters of individuals and organizations.

pi

A vector of probabilities of length Q_O, the mixture parameter for the organizations.

gamma

A Q_I \times Q_O matrix with each column summing to one, the mixture parameters for the individuals

alpha

A list of 2 matrices, a Q_I \times Q_I matrix giving the connectivity probabilities of the individuals and a Q_O \times Q_O matrix giving the connectivity probabilities of the organizations.

directed

A list of 2 logical. Is the individual level a directed network ? Is the inter-organizational level a directed network?

affiliation

The distribution under which the affiliation matrix is simulated in c("uniform", "preferential").

distribution

A list for the distribution of X, only "bernoulli" is implemented.

no_empty_org

A logical with FALSE as default, should every organizations have at least one affiliated individual? Needs to have n_I \geq n_O.

no_isolated_node

A logical, if TRUE then the network is simulated again until all nodes are connected.

Value

An MLVSBM object, a simulated multilevel network with levels, affiliations and memberships.

Examples

my_mlvsbm <- MLVSBM::mlvsbm_simulate_network(
  n = list(I = 10, O = 20), # Number of nodes for the lower level and the upper level
  Q = list(I = 2, O = 2), # Number of blocks for the lower level and the upper level
  pi = c(.3, .7), # Block proportion for the upper level, must sum to one
  gamma = matrix(c(.9, .2,   # Block proportion for the lower level,
                   .1, .8), # each column must sum to one
                 nrow = 2, ncol = 2, byrow = TRUE),
  alpha = list(I = matrix(c(.8, .2,
                            .2, .1),
                          nrow = 2, ncol = 2, byrow = TRUE), # Connection matrix
               O = matrix(c(.99, .3,
                            .3, .1),
                          nrow = 2, ncol = 2, byrow = TRUE)),# between blocks
  directed = list(I = FALSE, O = FALSE)) # Are the upper and lower level directed