根据地址或xy坐标创建地图 - 转换为lat和long？

Question

我有一个非常简单的问题（我对R很新），但经过一段时间的搜索，我找不到我想要的东西。

我需要在R中创建一个地图。最好使用Leaflet包，但我绝对接受其他建议。我的数据是导致问题的原因。我有所有点的地址和x y坐标，但大多数地图制作包需要纬度和经度数据。

有没有办法轻易转换地址或x y坐标？

我已经读过地理编码功能应该这样做了，但谷歌要求API为此运行，我必须承认我在那时迷路了。

这个数据包含大约50个点，所以用一个方法来转换为lat和long会很好。

非常感谢你提前。

x，y坐标的示例

Name     x       y
Point_1  556305  6306381

Answer 1

这样的事情？

查找crs使用：https://epsg.io/?q=denmark

样本数据

df <- data.frame( city = "Trinbak", lon = 556305, lat = 6306381 )

码

library(sf)
library(leaflet)

df.sf <- st_as_sf( df, coords = c("lon", "lat") ) %>%
  st_set_crs( 2198 ) %>%   #set coordinate system used
  st_transform( 4326 )     #transform coordinates to WGS84 coordinates

leaflet() %>% addTiles() %>% addMarkers( data = df.sf )

产量

update

也许

df.sf <- st_as_sf( df, 
                   coords = c("lon", "lat") ) %>%
  st_set_crs( 23032 ) %>%
  st_transform( 4326 )

更准确？