Кажется, моя легенда цветового ключа не полностью заполнена цветом ( т.е. в данном случае до 1). Кроме того, я пытаюсь расположить заголовок ключа ( т.е. сила связи) сверху клавиши, а не слева.
ggraph(lay.ggraph) +
geom_edge_link0(aes(edge_colour = links$weight),
edge_width = links$weight*10, lineend = "round") +
scale_edge_color_gradient(name = "Link Strength",
low = "#6495ED85", high = "#C1403D85") +
geom_node_point(shape = 21, fill = "#D3D3D3", color = "#808080",
size = 15, stroke = 2) +
labs(y = "TL") +
foodweb_theme`
