使Shapefile的属性成为R中的可选超链接

时间:2019-11-24 17:31:50

标签: r shiny hyperlink leaflet tmap

我有一个shapefile,可以从QGIS导出并使用R中的sf库进行加载。shapefile包含属性“ description”,该属性是指向网站的链接。我使用这个shapefile创建一个交互式传单地图。我希望“描述”属性显示为超链接,当以交互方式使用传单地图时可以选择该超链接。任何帮助弄清楚这一点将不胜感激。

代码:

library(shiny)
library(shinydashboard)
library(plotly)
library(sf)
library(maps)
library(tmap)
library(mapview)
library(leaflet)
library(tmaptools)
library(DT)

#Read in Data Files

AZ_Hunt_Units <- sf::st_read("AZHuntDash_v1.0/All_Arizona_SHPv2/All_Arizona_v2.shp", quiet = TRUE)    

output$tmapA = renderLeaflet({
  p =tm_shape(AZ_Hunt_Units)+
  tm_fill("grey",0.1) + tm_borders("purple",lwd=2)+tm_basemap(server ="OpenStreetMap")+tm_text("Name",size=1,col="red",fontface="bold")
  tmap_leaflet(p)
})

enter image description here

0 个答案:

没有答案