library(leaflet)
## Warning: 程序包'leaflet'是用R版本4.4.3 来建造的
# 创建一个简单的地图
m <- leaflet() %>%
  addTiles() %>%
  addMarkers(lat = 35.6895, lng = 139.6917, popup = "东京")

m