Включить пропорции как всплывающую подсказку geom_bar_interactive - PullRequest
0 голосов
/ 21 апреля 2019

Итак, я в основном пробую пакет ggiraph () и хочу построить столбчатую диаграмму с подсказками, которые показывают пропорцию каждой категории.

У меня большой набор данных с 3 переменными; общая эффективность, цикл. диапазон и тип. Вот некоторые примеры данных:

# A tibble: 20 x 3
   overall.effectiveness cycle.range type      
   <fct>                 <chr>       <chr>     
 1 2                     2008-2011   Government
 2 2                     2008-2011   Government
 3 2                     2015-       Government
 4 1                     2015-       Government
 5 3                     2011-2014   Government
 6 2                     2015-       Government
 7 3                     2008-2011   Government
 8 4                     2008-2011   Government
 9 4                     2008-2011   Government
10 4                     2011-2014   Private   
11 3                     2008-2011   Government
12 3                     2011-2014   Private   
13 3                     2011-2014   Government
14 4                     2015-       Private   
15 3                     2015-       Private   
16 4                     2011-2014   Private   
17 3                     2015-       Government
18 4                     2008-2011   Government
19 3                     2011-2014   Private   
20 4                     2015-       Government

Я успешно создал требуемую диаграмму с помощью основных команд ggplot2, и мне удалось заставить работать график (хотя пропорции, которые она отображает, представлены в десятичном формате). Однако я хотел бы увидеть, как этого можно достичь с помощью geom_bar_interactive и всплывающей подсказки.

Мой основной код, который работает с plotly, выглядит следующим образом:

plot.1 <- df %>% ggplot(aes(type, fill=overall.effectiveness)) +
  geom_bar(position=position_fill(reverse=TRUE)) + 
  facet_grid(cycle.range~.) +
  coord_flip()

ggplotly(plot.1)

Дополнительного кодирования не требуется, график автоматически включает всплывающую подсказку для пропорций и т. Д.

Однако я бы хотел повторить то же самое, но с помощью ggiraph. Пока я не уверен, что следует включить в качестве всплывающей подсказки?

plot.2 <- df %>% ggplot(aes(type, fill=overall.effectiveness)) +
  geom_bar_interactive(position=position_fill(reverse=TRUE)) + 
  facet_grid(cycle.range~.) +
  coord_flip()

girafe(code=print(plot.2))

любые предложения о том, как включить фактические пропорции в подсказку, будут очень полезны!

...