显示图形顶点的附加信息答案

【问题标题】：Display additional information on vertex of a graph显示图形顶点的附加信息
【发布时间】：2016-11-15 09:07:29
【问题描述】：

我有一个有向图，使用以下示例

ba <-  sample_pa(n=100, power=1, m=1,  directed=T)
V(ba)$color<-"yellow"
tkplot(ba , layout=layout.fruchterman.reingold(ba), canvas.width=1024,canvas.height=768)

我想找到一种方法来在我右键单击某个顶点时显示附加信息，或者使用当我在每个顶点上移动鼠标时出现的工具提示来显示信息。我试图为顶点设置属性，但我找不到显示它们的方法。

【问题讨论】：

标签： r igraph vertex-attributes tkplot

【解决方案1】：

我不知道tkplot，但这里有一个替代方案，它在悬停在边缘时显示工具提示。顶点也一样：

library(igraph)
library(visNetwork)
library(fortunes)
set.seed(1)
ba <-  sample_pa(n=100, power=1, m=1,  directed=T)
V(ba)$color<-"yellow"
E(ba)$title <- sapply(1:ecount(ba), function(x) paste(strwrap(fortune(x)$quote, 40L), collapse="<br>"))
visIgraph(ba) %>% 
  visEdges(color = "black") %>% 
  visIgraphLayout("layout.fruchterman.reingold") %>%
  visOptions(width = "1600", height = "1200")

【讨论】：

感谢卢克，现在我正在尝试转换信息以供 visNetwork 使用，我会尽快通知您
现在我正在努力了解如何放大显示窗口的大小
用鼠标放大/缩小？
在网络浏览器中绘制图表时，它只使用了一部分，占整个页面的一半，所以我想增加绘制图表的空间
您可以添加%>% visOptions(width = "1600", height = "1200")或类似的东西。