Как распределить возрастную структуру населения по полу с помощью GoogleVis и R?

Question

Я пытаюсь создать график структуры населения по возрасту и полу, используя R и googleVis. Однако график никогда полностью не загружается в браузере. Я просто получаю сообщение «загрузка» и не выводят. Команда я использую в RStudio является

plot(gvisMotionChart(data, idvar = "id", timevar = "ExpYear", xvar = "ExpYear", yvar = "n", colorvar = "AgeGroup",sizevar = "n")) 

Мои данные Мои данные в основном показывает число людей, в той или иной возрастной группе (возрастная группа столбцов) в конкретном году (между 2000-2014) для определенного пола и может быть найдено здесь: https://github.com/kilimba/data.

Не уверен, как идти о отладке, или это даже проблема с кодом или данными. Я также новичок в боте R и GoogleVis, поэтому любая помощь будет очень признательна.

Тумаини

Answer 1

Вы используете то же переменное для timevar и xvar измерения.

Try, например (время = год, х = возрастная группа, у = п и цвет = пол):

plot(gvisMotionChart(data, idvar = "id", timevar = "ExpYear", xvar = "AgeGroup", yvar = "n", colorvar = "Sex")) 

Чтобы увидеть движение, вы должны перестроить свои данные таким образом, что у вас есть один идентификатор для всех года. Set ID, например, как сочетание и возрастная группа Пол:

library(dplyr) 
library(tidyr) 

df2 <- data %>% 
    group_by(ExpYear, AgeGroup, Sex) %>% 
    summarize(n = sum(n)) %>% 
    mutate(id = paste(AgeGroup, Sex)) 

И сюжет с:

plot(gvisMotionChart(df2, idvar = "id", timevar = "ExpYear", xvar = "AgeGroup", yvar = "n", colorvar = "Sex"))