Shiny 什么导致标记'；发光传单地图中的位置不准确（约500米）？

我正在尝试创建一个传单地图，作为R-Shiny项目的一部分，该项目在我之前使用GoogleAPI根据地址信息进行地理编码的位置显示圆圈标记。把lon/lat值放回谷歌，我就能知道地址的确切位置

当我使用下面的代码从我闪亮的项目中的lon/lat值创建贴图时，标记位置在随机方向上偏离了几百米（在最大缩放级别）

基于谷歌搜索，我猜测这与由于缩放级别或不兼容的地图投影而改变标记位置有关

  output$mymap <- renderLeaflet({

alldata_sel = alldata  
if(input$dachverbandCheck != T){alldata_sel = filter(alldata_sel, Dachverband==input$dachverband)}
if(input$landkreisCheck != T){alldata_sel = filter(alldata_sel, Landkreis==input$landkreis)}
if(input$leistungstypCheck != T){alldata_sel = filter(alldata_sel, 
                                        LeistungstypBezeichnung==input$leistungstyp)}
if(input$traegerCheck != T){alldata_sel = filter(alldata_sel, Traegername==input$traeger)}

  #initialize map and setView
  leaflet(options = leafletOptions(minZoom = 5, maxZoom = 18)) %>%
  addProviderTiles(providers$CartoDB.Positron) %>% 
  addCircleMarkers(
    data = alldata_sel,
    lng=~longitude, # Longitude coordinates
    lat=~latitude, # Latitude coordinates
    radius=~KapRadius, 
    stroke=FALSE, # Circle stroke
    fillOpacity=0.5, # Circle Fill Opacity
    color = rgb(alldata_sel$colour_r, alldata_sel$colour_g, alldata_sel$colour_b,
                maxColorValue = 255)
  )
})

输出$mymap%
addProviderTiles（提供程序$CartoDB.Positron）%>%
addCircleMarkers(
数据=所有数据选择，
lng=经度，#经度坐标
纬度=~纬度，#纬度坐标
半径=~k半径，
笔划=假，#圆笔划
fillOpacity=0.5，#圆形填充不透明度
颜色=rgb（所有数据选择$colour，所有数据选择$colour，所有数据选择$colour，
maxColorValue=255）
)
})

您能提供一个特别发音的坐标示例吗？其中一个地址是德国比蓬49626号Pastors Kamp 1。这是地理编码为lat=52.58204，lon=7.73484，这给了我返回谷歌地图的正确位置。我的传单地图中的位置约为52.583943，7.735384，距离真实位置约210米。这不是最极端的例子，但对我来说已经太不准确了。你能提供一个特别发音的例子吗？其中一个地址是德国比蓬49626号Pastors Kamp 1。这是地理编码为lat=52.58204，lon=7.73484，这给了我返回谷歌地图的正确位置。我的传单地图中的位置约为52.583943，7.735384，距离真实位置约210米。这不是最极端的例子，但对我来说已经太不准确了。