Ggraph节点颜色与边缘颜色匹配

Question

是否可以使ggraph绘制与连接的边缘颜色相同的颜色？我试过手动给ggraph填充边缘和节点的颜色，没有任何运气。看起来这似乎是一件微不足道的事情，但是我找不到任何方向。我的问题与this question有点相似，但是我想给节点上的度数和它们的向外度边相同。

library(tidyverse)
library(igraph)
library(ggraph)


g <- graph_from_data_frame(highschool)


ggraph(g)+
  geom_edge_fan(aes(color = from))+
  geom_node_point(aes(color = name), show.legend = F, size = 5)

Answer 1

这可能有效：

colfunc <- colorRampPalette(c("#00008B", "#63B8FF"))
cols <- colfunc(70)

ggraph(g)+
  geom_edge_fan(aes(color = from)) +
  scale_edge_colour_gradient(low = "#00008B", high = "#63B8FF") + 
  geom_node_point(color = cols, show.legend = F, size = 3)