Affiche des informations supplémentaires sur le sommet d'un graphe

Question

J'ai un graphe orienté, en utilisant l'exemple suivant

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) 

Je voudrais trouver le moyen d'afficher des informations supplémentaires lorsque je rightClick sur un sommet ou ayant l'affichage l'information en utilisant une info-bulle qui apparaît lorsque je déplace la souris sur chacun des vertex. J'ai essayé de définir des attributs au vertex mais je ne trouve pas le moyen de les afficher.

Answer 1

Je ne sais pas à propos de tkplot, mais voici une alternative qui affiche une info-bulle sur planant sur le bord. Les mêmes œuvres pour les sommets, aussi:

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")