Calculates the effective information (EI) of a network, \(G\), according to the definition provided in Klein & Hoel, 2019. Here, we subtract the average entropies of the out-weights of nodes in a network, WOUT_average from the entropy of the average out-weights in the network, WIN_entropy.

effective_information(graph, effectiveness = FALSE)

Arguments

graph

igraph or matrix object.

effectiveness

Logical indicating whether or not to return network effectiveness.

Value

Numeric value indicating the effective information of the network.

Examples

graph <- matrix(
  cbind(
    c(0.0, 1.0, 0.0, 0.0),
    c(0.0, 0.0, 1.0, 0.0),
    c(0.0, 0.0, 0.0, 1.0),
    c(0.0, 0.0, 0.0, 0.0)
  ),
 nrow = 4
) %>%
  igraph::graph.adjacency(mode = "directed")

effective_information(graph)
#> [1] 1.584963