如何为ggraph中的节点和标签上色

Question

如何在ggraph图中指定边的颜色，如下所示

library(ggraph)
library(igraph)
df_school = highschool %>% mutate(yr=ifelse(year%%2==0,'purple','blue'))
graph = df_school %>% graph_from_data_frame()
V(graph)$node_label = names(V(graph))
ggraph(graph, layout = 'linear', circular = TRUE) + 
  geom_edge_arc(aes(colour = factor(year))) + 
  geom_node_label(aes(label=node_label), alpha=0.2) + 
  scale_edge_colour_identity() 

在这里，只有边缘是彩色的，但我不知道如何编码节点或标签，或者使标签背景半透明。不知道是否有人能帮上忙。

Answer 1

您可以分别控制节点和节点标签。前缀是geom_node_ --有很多选项。下面的代码生成了这个图。

ggraph(graph, layout = 'linear', circular = TRUE) + 
  geom_edge_arc(aes(colour = factor(year))) + 
  geom_node_point(size = 8)+ # add nodes
  geom_node_text(aes(label = name), # add node labels
                 colour = 'white')+
  coord_equal()

​

​