У меня есть набор данных, содержащий информацию о перепродажах домов в моей стране.Я использовал ggmap geocode function
для получения координат соответствующих адресов и отображал их на карте с помощью leaflet package
.Однако кластерные маркеры размещаются случайным образом.Мне бы хотелось, чтобы маркеры отображались на основе разных атрибутов на разных уровнях масштабирования с показанными легендами.
Таким образом, при разумном уровне масштабирования маркеры основаны на количестве домов в определенных регионах (например, на севере, в центре, Восток, Запад, Северо-Восток).
Увеличьте немного дальше, и кластерные маркеры городов в этом конкретном регионе отображаются
При более глубоком уровне масштабирования маркеры покажутколичество домов по типам квартир в этом городе.
Вот что я сделал до сих пор, но это немного.Я извиняюсь за то, что я относительно новичок в программировании на R.
test <- data.frame(lat = qns$lat,
lng = qns$lon)
test %>%
leaflet() %>%
addTiles()%>%
addMarkers(clusterOptions = markerClusterOptions())
Вот скриншот моего текущего сюжета карты Mapplot1
Вот пример моих данных
town <-c('Ang Mo Kio','Sembawang','Clementi','Pasir Ris','Yishun')
region <-c('North_East','North','West','East','North')
flat_type <-c('3 ROOM','3 ROOM','4 ROOM','5 ROOM','4 ROOM')
lat <-c(1.377804,1.450675,1.312938,1.377781,1.422404)
lon <-c(103.8381 ,103.8189,103.7716, 103.9405,103.8465)
qns <-data.frame(town,region,flat_type,lat,lon)