Делать спиральную диаграмму с помощью ggplot? - PullRequest
Новая
       74

Делать спиральную диаграмму с помощью ggplot?

1 голос
/ 03 октября 2019

Я пытаюсь создать спиральную столбчатую диаграмму, как в следующих примерах:

spiral chart

another chart

Предыдущийиз Спиральный барплот с использованием ggplot &ordin_polar (Condegram) , но я не могу заставить его работать с моими данными.

Используя ggplot, это насколько я получил: 

data <- read.table(text="year   group1  group2
1973    25939   27147
1978    21086   23108
1989    28401   24010
1995    34601   25457
2000    38672   28894
2007    40874   34926
2009    43892   38169
2013    48028   39270
2014    47289   39948
2015    48261   41913
2016    49814   42373
2017    50346   42818",header=T)

data$year <- as.character(data$year)

data <- data %>% gather(group, value, group1:group2)

ggplot(data)+
  geom_bar(aes(x=year, y=value, fill=group), stat="identity", position = "dodge") +
  coord_polar()

Который дает уродливую спиральную гистограмму ugly spiral chart

Я не уверен, как сделать квадраты дна квадратными и добавить пространство, необходимое для белой спирали. Буду признателен за любую помощь и объяснение!

...