Как я должен извлечь переменную из части JavaScript в R?

Question

Например, ниже, как я могу извлечь переменную х?x - это геолокация, полученная из части javascript, но я хочу передать ее в мой блок R.

leaflet() %>% 
addTiles() %>% 
addEasyButton(easyButton(icon="fa-crosshairs", title="Locate Me", 
onClick=JS("function(btn, map){var x = map.getCenter(); }")))