data("data_tuto")
mat_gen <- data_tuto[[1]]
graph <- gen_graph_thr(mat_w = mat_gen, mat_thr = mat_gen,
thr = 0.8)
res_mod <- compute_graph_modul(graph = graph,
algo = "fast_greedy",
node_inter = "distance")
Run the code above in your browser using DataLab