Randomizacje przechodniości
Podobnie jak w przypadku średniej długości ścieżki, sprawdź, czy globalna przechodniość sieci Forresta Gumpa jest istotnie wyższa, niż można by się spodziewać w losowych sieciach o tym samym rozmiarze i gęstości. Porównaj globalną przechodniość sieci Forresta Gumpa z 1000 innymi losowymi sieciami.
To ćwiczenie jest częścią kursu
Analiza sieci w R
Instrukcje do ćwiczenia
- Tysiąc losowych sieci jest zapisanych w obiekcie listy
gl. Używająclapply()itransitivity(), oblicz globalną przechodniość każdej z tych sieci. Wynik przypisz dogl.tr. - Używając
unlist(), przekształćgl.trna wektor numerycznygl.trs. - Zbadaj statystyki opisowe przechodniości losowych sieci za pomocą
summary(). - Oblicz odsetek losowych grafów, których przechodniość jest wyższa niż przechodniość sieci Forresta Gumpa – wcześniej ją obliczyłeś i przypisałeś do
g.tr.
Interaktywne ćwiczenie praktyczne
Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.
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 > ___)