如何在R Leaflet中显示所有附近的点？

Question

我正在使用R Leaflet创建地图，以在选择特定坐标时显示所有附近的点。我已经设法在地图中彼此放置不同的图层。它将显示来自不同层的所有点。

根据此图片：

当我放大时，我想要它，以便仅显示附近的点，其余的将被删除。这样，我可以知道在我指定的坐标附近有多少点并将其列出。

以下面的图像为例。从黑点开始，附近有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"))

任何帮助，将不胜感激。