popupTable()の利用に関して

leaflet mapview r

mapview::popupTable()を利用すると、簡単にポップアップを作成でき便利であるが、 windows環境だと文字コードの問題があり？うまく表示できないことが多い。

その際には以下のようにすることで解決することができる。

m_base <- 
  leaflet(options = leafletOptions(crs = leafletCRS(code = "EPSG:4612"))) %>%
  addTiles()
m_base %>%
  addPolygons(data = N03, 
              popup = mapview::popupTable(N03) %>% lapply(enc2utf8))