我刚刚使用R中的leaflet包创建了一个简单的交互式地图.像这样
leaflet() %>% addTiles()
Run Code Online (Sandbox Code Playgroud)
现在我想将它嵌入我的wordpress网站.
我点击RStudio Viewer的导出按钮并选择"另存为网页...",然后将.html存储在我的本地计算机中.
我试图通过点击页面编辑器中的"添加媒体"并选择之前存储的.html,在WP网站的帖子中嵌入此地图.但我得到错误:
"无法上传1个文件,因为不支持文件类型."
我试图在编辑器中打开html文件,并将(非常长,全坐标)html代码复制并粘贴到WP页面编辑器的html选项卡中.编辑器将此代码转换为
<div id="htmlwidget_container">
<div id="htmlwidget-2390" class="leaflet html-widget" style="width: 100%; height: 400px;"></div> </div>
Run Code Online (Sandbox Code Playgroud)
我在可视标签中看不到任何地图.我真的不知道该怎么办.任何帮助将不胜感激.正如您所注意到的,我对WP和Web应用程序完全陌生.
非常感谢,jacopo
我在 R 中构建了一个带有传单包的传单。这里是使用的代码的简化版本
图书馆(传单)
# dumb data
Points <- data.frame(lon = c(41.889, 41.882, 41.891), lat = c(12.455, 12.446, 12.459))
# web map
wland <-
leaflet(data = Points) %>%
addTiles() %>%
addCircleMarkers(col = "red",
fillOpacity = 1,
radius = 5,
stroke = TRUE,
clusterOptions = markerClusterOptions(
maxClusterRadius=35, disableClusteringAtZoom=14
))
saveWidget(wland, "To:/Your/Path/map.html", selfcontained = FALSE)
Run Code Online (Sandbox Code Playgroud)
我在这里上传了 html 和所有 javascript 。它在桌面上看起来不错,但在移动设备上却没有很好的响应:标记仍然太小等等。您知道如何使传单移动响应吗?我应该在 R-leaflet 创建的 javascript 中修改一些东西吗?
谢谢,雅各布