Data Science, Data Visualization, R.
circle. let’s compute and save agian. secondLevel = gov_pop %>% mutate(running=cumsum(total_pop), pos=running — total_pop/2) %>% group_by(1:n()) %>% # to compute row by row mutate(angle=compute_angle((running — total_pop/2) / sum_total_pop)) Let’s do viz again sunburst_2_text = sunburst_2 +