Цвет узла Ggraph для соответствия цвету ребра

Question

Можно ли заставить ggraph отображать цвета узлов того же цвета, что и цвет связанного края? Я попытался подать ggraph цвета для ребер и узлов без какой-либо удачи. Кажется, что это было бы довольно тривиально, но я не могу найти какое-либо направление на это. Мой вопрос чем-то похож на на этот вопрос , но я бы хотел покрасить свои узлы так же, как их края за пределами степени.

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)