Using betweenness centrality as an underpinning concept, Everett and Valente (2016) propose a new brokerage measure and explore its relationship to classic betweenness.

This package contains simple R code for calculating Everett and Valente (2016) brokerage scores for both undirected and directed graphs.

For more information about the brokerage measure, see:

Everett MG, Valente TW. Bridging, brokerage, and betweenness. Social Networks. 2016; 44:202-208. DOI: 10.1016/j.socnet.2015.09.001

Clone the repository to your local machine:

git clone https://github.com/babak2/EV-brokerage.git

or if you have the program as a ZIP file, simply extract the zip file to a directory of your choice.

Change your working directory to EV-brokerage:

cd EV-brokerage

R or RStudio with the following libraries installed: tidygraph, igraph, ggraph

Open EV-brokerage.R in R or RStudio

g: a graph (of type igraph or tidygraph).

as.graph (optional): By default, the result is returned as a data frame. To obtain the result as a graph, set as.graph to TRUE.

all.values (optional): By default, it is set to FALSE. If set to TRUE, it will include all the other calculated values in addition to EV brokerage scores.

as.graph (optional): By default, the results are returned as a DataFrame; if set to TRUE, the output will be returned as a graph.

The score as a DataFrame (by default) or as a graph if as.graph is set to TRUE.

If the original graph has original IDs (names), the results will include the original IDs (names).

granovetter_graph.RDS: This dataset contains the undirected graph of the Granovetter hypothetical network as shown in Figure 1 of Everett & Valente (2016) article

campnet_graph.RDS: This dataset contains the directed graph of the Campnet hypothetical network as shown in Figure 3 of Everett & Valente (2016) article.

g <- readRDS("granovetter_graph.RDS")

g <- readRDS("campnet_graph.RDS")

res.df <- ev_brokerage(g)

To obtain the result as graph:

res.g <- ev_brokerage(g, as.graph=TRUE)

Use all.values=TRUE to include other calulated values in addition to EV brokerage scores:

res.df <- ev_brokerage(g, all.values=TRUE)

With all.values=TRUE, you obtain the entire scores and other values (if IDs are included in the graph datasets). For example, for the Granovetter network case, this would be:

And for the Campnet network case, this would be:

This program is licensed under the GNU GENERAL PUBLIC LICENSE. See LICENSE for more information.

Babak Mahdavi Ardestani

[email protected]