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 merupakan bagian dari kursus

Analitik Prediktif menggunakan Data Berjejaring di R

Lihat Kursus

Instruksi 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 langsung praktik

Cobalah latihan ini dengan melengkapi kode contoh ini.

# 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