Transitivitetsrandomiseringar

Precis som du gjorde för den genomsnittliga väglängden ska vi nu undersöka om den globala transitiviteten i Forrest Gump-nätverket är signifikant högre än vad vi kan förvänta oss av en slumpmässig process för slumpmässiga nätverk av samma storlek och densitet. Du kan jämföra Forrest Gumps globala transitivitet med 1 000 andra slumpmässiga nätverk.

Den här övningen är en del av kursen

Nätverksanalys i R

Visa kurs

Övningsinstruktioner

Tusen slumpmässiga nätverk finns lagrade i listobjektet gl. Använd lapply() och transitivity() för att beräkna den globala transitiviteten för vart och ett av dessa nätverk. Tilldela resultaten till gl.tr.
Använd unlist() för att konvertera gl.tr till en numerisk vektor gl.trs.
Undersök sammanfattningsstatistiken för transitiviteterna hos de slumpmässiga nätverken med hjälp av summary().
Beräkna andelen slumpmässiga grafer som har en transitivitet som är högre än transitiviteten i Forrest Gumps nätverk, vilket du tidigare beräknade och tilldelade till g.tr.

Interaktiv övning med praktiskt arbete

Testa den här övningen genom att slutföra den här exempelkoden.

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 > ___)

Redigera och kör kod