visNetwork地理坐标

Question

我试图使用visNetwork绘制地理igraph网络。 igraph代码如下，我发现了这个visNetwork解决方案，但我在修改代码方面遇到了问题https://github.com/DataKnowledge/visNetwork/blob/master/R/visIgraphLayout.R

library(raster)
library(igraph)
greece <- getData('GADM', country='GRC', level=1)
df<-data.frame("from" = c("Athens", "Iraklio", "Thessaloniki", "Patra"), "to"= c("Thessaloniki", "Thessaloniki", "Athens", "Iraklio"))
meta <- data.frame("name"=c("Athens", "Iraklio", "Thessaloniki", "Patra"), 
           "lon"=c(23.72800,25.13356,22.94090,21.73507),  
           "lat"=c(37.98415,35.33349,40.63229,38.24628))
g <- graph.data.frame(df, directed=T, vertices=meta)
lo <- as.matrix(meta[,2:3])
plot(greece)
plot(g, layout=lo, add = TRUE, rescale = FALSE)

修改 的更新

我有一个R-igraph网络，这是使用visNetwork库可视化的。 我有一个空间数据框，使用Leaflet可视化。 如何在地图上可视化网络但保留visNetwork功能？见example here