如何為圖形的頂點着色？

Question

我有這樣的事情：

library(igraph)

table <- data.frame(p = c("A","B","C","D","A"), h = c("H1","H2","H3","H1","H2"))
graf_table <- graph_from_data_frame(table,  directed = F)
plot(graf_table, edge.curved=0.5, vertex.size=40, edge.width=2)

我想按列為頂點着色。 這意味着 p 列的頂點是紅色的，h 列的頂點是藍色的。

Answer 1

這是一種為圖形的頂點着色的方法。

1. 創建一個索引，給出頂點是否在列p 。 索引i是一個邏輯向量，內部編碼為0/1 。
2. 將 1 添加到i ，因為在 R 中向量索引是基於 1 的。
3. 使用該索引為頂點分配顏色。

然后繪制圖形，記住添加前綴vertex. 到圖形參數color 。

library(igraph)

i <- names(V(graf_table)) %in% table$p
graf_table$color <- c("blue", "red")[i + 1]

plot(graf_table, edge.curved=0.5, vertex.size=40, edge.width=2,
     vertex.color = graf_table$color)