読者です 読者をやめる 読者になる 読者になる

popupTable()の利用に関して

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