Randomizări ale tranzitivității

Așa cum ai făcut pentru lungimea medie a drumurilor, să investigăm dacă tranzitivitatea globală a rețelei Forrest Gump este semnificativ mai mare decât ne-am aștepta întâmplător, pentru rețele aleatoare de aceeași dimensiune și densitate. Poți compara tranzitivitatea globală a lui Forrest Gump cu cea a altor 1.000 de rețele aleatoare.

Acest exercițiu face parte din cursul

Analiza rețelelor în R

Vezi cursul

Instrucțiuni pentru exercițiu

O mie de rețele aleatoare sunt stocate în obiectul listă gl. Folosind lapply() și transitivity(), calculează tranzitivitatea globală a fiecăreia dintre aceste rețele. Atribuie rezultatele variabilei gl.tr.
Folosind unlist(), convertește gl.tr într-un vector numeric gl.trs.
Analizează statisticile sumare ale tranzitivităților rețelelor aleatoare folosind summary().
Calculează proporția grafurilor aleatoare care au o tranzitivitate mai mare decât tranzitivitatea rețelei lui Forrest Gump, calculată anterior și atribuită variabilei g.tr.

Exercițiu interactiv practic

Încearcă acest exercițiu completând acest cod de exemplu.

library(igraph)

# Calculate average transitivity of 1000 random graphs
gl.tr <- ___(gl, ___)
gl.trs <- ___(gl.tr)

# Get summary statistics of transitivity scores
___(gl.trs)

# Calculate the proportion of graphs with a transitivity score higher than Forrest Gump's network
mean(gl.trs > ___)

Editează și rulează codul