Usando randomizações para avaliar assortatividade

Neste exercício, você vai determinar quão provável é a assortatividade observada na rede de amizades, dado o gênero dos vértices, executando um procedimento de randomização. Você vai permutar aleatoriamente o gênero dos vértices na rede 1000 vezes e recalcular a assortatividade para cada rede aleatória.

Este exercício faz parte do curso

Network Analysis in R

Ver curso

Instruções do exercício

Use assortativity() para calcular a assortatividade do objeto grafo g1 com base em gênero usando o objeto values calculado no exercício anterior e atribua o resultado ao objeto observed.assortativity.
Dentro do laço for, calcule a assortatividade da rede g1 usando assortativity() enquanto permuta aleatoriamente o objeto values a cada vez com sample().
Plote a distribuição dos valores de assortatividade desse procedimento de permutação usando hist() e adicione uma linha vertical vermelha para o valor de assortatividade observado da rede original g1, que está armazenado em observed.assortativity.

Exercício interativo prático

Experimente este exercício completando este código de exemplo.

# Calculate the observed assortativity
observed.assortativity <- ___(g1, values)

# Calculate the assortativity of the network randomizing the gender attribute 1000 times
results <- vector('list', 1000)
for(i in 1:1000){
  results[[i]] <- ___(g1, sample(___))
}

# Plot the distribution of assortativity values and add a red vertical line at the original observed value
___(unlist(results))
abline(v = ___, col = "red", lty = 3, lwd=2)

Editar e executar o código