更改图例中点的透明度

Question

我用igraph绘制了网络图。顶点的不透明度降低到0.5。

现在，我想手动将图例添加到图中，其中的点与图中的顶点具有相同的颜色/透明度。

plot(g, vertex.color = adjustcolor(V(g)$color, alpha = 0.5))
legend('topleft',legend = names, pt.cex = 2, pch = 21, pt.bg = colors)

如何更改图例中点的透明度？

Answer 1

由于您不提供数据，因此我组成了一些示例数据。另外，“名称”和“颜色”都是R函数的名称，因此我将它们更改为“名称”和“颜色”。

只需再次使用adjustcolor即可进行所需的调整。

library(igraph)

## Some sample data
set.seed(1234)
g = erdos.renyi.game(10, 0.3)
Colors = rainbow(4)
V(g)$color = sample(Colors,10, replace=TRUE)
Names = paste("N", 1:4, sep="")

## Your plot and adjusted legend
plot(g, vertex.color = adjustcolor(V(g)$color, alpha = 0.5))
legend('topleft', legend = Names, pt.cex = 2, pch = 21, 
    pt.bg = adjustcolor(Colors, alpha = 0.5))