Learn R Programming

NetworkToolbox (version 1.1.1)

commboot: Bootstrapped Communities Likelihood

Description

Bootstraps the sample with replace to compute walktrap reliability

Usage

commboot(data, normal = FALSE, n = nrow(data), iter = 100,
  filter = c("TMFG", "threshold"), method = c("louvain", "walktrap"),
  na.data = c("pairwise", "listwise", "fiml", "none"), steps = 4,
  seeds = NULL, ...)

Arguments

data

A set of data

normal

Should data be transformed to a normal distribution? Defaults to FALSE. Data is not transformed to be normal. Set to TRUE if data should be transformed to be normal

n

Number of people to use in the bootstrap. Defaults to full sample size

iter

Number of bootstrap iterations. Defaults to 100 iterations

filter

Set filter method. Defaults to "TMFG"

method

Defaults to "walktrap". Set to "louvain" for the louvain community detection algorithm

na.data

How should missing data be handled? For "listwise" deletion the na.omit function is applied. Set to "fiml" for Full Information Maxmimum Likelihood (psych package). Full Information Maxmimum Likelihood is recommended but time consuming

steps

Number of steps to use in the walktrap algorithm. Defaults to 4. Use a larger number of steps for smaller networks

seeds

Seeds to use for random number generation. Defaults to NULL. Input seeds from previous run (see examples)

...

Additional arguments for network filtering methods

Value

Returns a list with the factors and their proportion found across bootstrapped samples (proportion; i.e., their likelihood) and the seeds used in the random number generator (Seeds)

References

Blondel, V. D., Guillaume, J. L., Lambiotte, R., & Lefebvre, E. (2008). Fast unfolding of communities in large networks. Journal of Statistical Mechanics: Theory and Experiment, 2008(10), P10008.

Csardi, G., & Nepusz, T. (2006). The igraph software package for complex network research. InterJournal, Complex Systems, 1695(5), 1-9.

Examples

Run this code
# NOT RUN {
commTMFG<-commboot(neoOpen)

#Replicates previous analysis
repcommTMFG<-commboot(neoOpen, seeds = commTMFG$Seeds)

commThreshold<-commboot(neoOpen,filter="threshold")
# }

Run the code above in your browser using DataLab