Страны, перемещающиеся при использовании gganimate - PullRequest
Новая
       26

Страны, перемещающиеся при использовании gganimate

0 голосов
/ 08 ноября 2018

Я анимирую карту с процентом смертей в Африке, вызванных ВИЧ / СПИДом. В течение нескольких лет анимация работает хорошо, но в другие годы страны как бы прыгают. Данные можно найти здесь . Мой код показан ниже 

library(sf)
library(rworldmap)
library(transformr)
library(gganimate)
library(tidyverse)

mortality <– read_csv("path_to_file")

africa_map <- getMap(resolution = "low") %>% st_as_sf() %>% 
 filter(continent == "Africa")

mortality %>% filter(region == "Africa", disease == "HIV/AIDS") %>% 
 mutate(year = as.integer(year(year))) %>% drop_na() %>% 
 left_join(africa_map, by = c("country_code" = "SOV_A3")) %>% 
 ggplot() + geom_sf(aes(fill = percent)) +
 transition_time(year) +
 labs(title = "Year: {frame_time}")

Есть идеи, как это исправить?

...