Colorer les nœuds

Dans cet exercice, vous allez colorer les nœuds du réseau selon l'état de désabonnement. Les clients qui se sont désabonnés seront en rouge et ceux qui ne se sont pas désabonnés seront en blanc. Vous visualiserez ensuite de nouveau le réseau.

Cette activité fait partie du cours

Analytique prédictive avec des données en réseau dans R

Voir le cours

Instructions de l’exercice

Ajoutez un attribut de nœud appelé color qui est identique à V(network)$churn.
Dans V(network)$color, utilisez la fonction gsub() pour remplacer la chaîne "1" par la chaîne "red".
Dans V(network)$color, utilisez la fonction gsub() pour remplacer la chaîne "0" par la chaîne "white".
Visualisez de nouveau le réseau avec la fonction plot().

Exercice interactif pratique

Essayez cet exercice en complétant ce code d’exemple.

# Add a node attribute called color
V(network)$___ <- V(network)$churn

# Change the color of churners to red and non-churners to white
V(network)$color <- gsub(___, "red", V(network)$color) 
V(network)$color <- gsub(___, "white", V(network)$color)

# Plot the network
___(___, vertex.label = NA, edge.label = NA,
    edge.color = "black", vertex.size = 2)

Modifier et exécuter le code