Как показать все близлежащие точки в R Leaflet?

Question

Я создаю карту, используя буклет R, чтобы показать все близлежащие точки при выборе конкретных координат.Мне уже удалось нанести разные слои друг на друга на карте.И он покажет все точки из разных слоев.

Согласно этому изображению:

Когда я увеличиваю изображение, я хочу, чтобы отображались только близлежащие точки, а остальные удалялись,Таким образом, я могу узнать, сколько точек находится рядом с указанной мной координатой, и вывести их вниз.

Используя изображение ниже в качестве примера.От черной точки есть 3 точки, которые находятся рядом, маркер красного круга и 2 нормальных маркера.

Это мои коды на данный момент:

mrt<-read.csv("mrtsg.csv")
mrt<- as.data.frame(mrt)
stationname<-mrt$STN_NAME
stationname

primaryschool <- read.csv("primaryschoolsg.csv")
primaryschool <- as.data.frame(primaryschool)

leaflet() %>%
  addTiles() %>%
  addCircleMarkers(
    data = mrt, 
    radius = 7, 
    color = ~pal(COLOR),
    stroke = FALSE, 
    fillOpacity = 0.7, 
    lat = ~Latitude, lng = ~Longitude,
    popup = stationname) %>%
  addMarkers(data = primaryschool,
             lat =~Latitude, lng = ~Longitude, 
             clusterOptions = markerClusterOptions())

pal <- colorFactor(levels = c("RED", "BLUE", "GREEN","YELLOW","PURPLE","BROWN","GREY"),
                   palette = c("red", "blue", "green","yellow","purple","brown","grey"))

Любая помощь с этим будет принята с благодарностью.