блестящий R: хороплеты и информация о шоу - PullRequest
0 голосов
/ 26 мая 2020

Я пытаюсь использовать блеск, чтобы раскрасить карту мира разными цветами. Эти цвета должны быть основаны на средней оценке каждого местоположения / штата. У меня есть эти два фрагмента кода: он получает значения местоположений в наборе данных и вычисляет среднее значение всех вхождений.

Location <- group_by(chocolate, CompanyLocation)
LocationRating <- summarise(Location, ratingMedio=mean(Rating))

Результат - LocationRating, который выглядит следующим образом:

КомпанияРейтинг местоположенияСреда

1 Амстердам 3,5

2 Аргентина 3,32

3 Австралия 3,33

4 Австрия 3,17

5 Бельгия 3,35

Моя идея состоит в том, чтобы иметь карту мира и раскрашивать ее разными цветами в зависимости от интервалов рейтинга (где рейтинг - это число в [1, 5]), а затем показывать рейтинг страны, если я нажимаю на нее мышкой.

output$mymap <- renderLeaflet({
        leaflet() %>%
            addProviderTiles(providers$Stamen.TonerLite,
                             options = providerTileOptions(noWrap = TRUE)
            )})

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

...