Memberi warna pada simpul

Dalam latihan ini, Anda akan memberi warna pada simpul dalam jaringan berdasarkan status churn. Pelanggan yang melakukan churn akan diberi warna merah dan yang tidak churn akan diberi warna putih. Kemudian Anda akan memvisualisasikan kembali jaringannya.

Latihan ini adalah bagian dari kursus

Analitik Prediktif menggunakan Data Berjejaring di R

Lihat Kursus

Petunjuk latihan

Tambahkan atribut simpul bernama color yang sama dengan V(network)$churn.
Pada V(network)$color, gunakan fungsi gsub() untuk mengganti string "1" dengan string "red".
Pada V(network)$color, gunakan fungsi gsub() untuk mengganti string "0" dengan string "white".
Visualisasikan kembali jaringan dengan menggunakan fungsi plot().

Latihan interaktif praktis

Cobalah latihan ini dengan menyelesaikan kode contoh berikut.

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

Edit dan Jalankan Kode