tm_bubbles из tmap дезорганизует имена при обработке NA - PullRequest
Новая
       10

tm_bubbles из tmap дезорганизует имена при обработке NA

1 голос
/ 22 марта 2020

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

Когда я сопоставляю данные. Все выглядит, но при переворачивании пузырьков они не показывают правильное название провинции. Только для первых трех провинций, которые не имеют НС. Я попытался изменить НС на нули, но затем появились небольшие пузырьки для провинций, которые имеют нулевые подтвержденные случаи. Я не хочу никаких пузырей для провинций, в которых нет подтвержденных случаев. 

covid19_confirmed_today_map <- covid19_confirmed_today %>%
  tm_shape() + tm_polygons(col = "skyblue", alpha = 0.2) +
  tm_bubbles(size = "Casos", col = "red", alpha = 0.6, border.lwd = NA)

covid19_confirmed_today_map <- tmap_leaflet(covid19_confirmed_today_map)
covid19_confirmed_today_map %>% removeLayersControl() %>%
  setView(lng = -78.50374, lat = -1.289527, zoom = 7) %>% fitBounds(-80.8, -4.2, -76.5, 0.8)

Здесь , где написано "Carchi", следует сказать "Chimborazo". Там написано "Carchi", потому что это не первая провинция с АН. Всякий раз, когда есть провинция с NA, она переходит к следующей провинции и добавляет название этой провинции (без NA) к предыдущей провинции (той, которая имела NA). Большое спасибо за любую помощь.

1 Ответ

0 голосов
/ 22 марта 2020

Рассмотрите возможность удаления областей, в которых отсутствуют данные из covid19_confirmed_today. Затем добавьте второй tm_shape с этим измененным объектом перед использованием tm_bubbles. 

covid19nomissing <- covid19_confirmed_today[!is.na(covid19_confirmed_today$Casos) ,]

covid19_confirmed_today_map <- covid19_confirmed_today %>%
  tm_shape() + tm_polygons(col = "skyblue", alpha = 0.2) +
  tm_shape(covid19nomissing) +
  tm_bubbles(size = "Casos", col = "red", alpha = 0.6, border.lwd = NA)
...