Интерактивная гистограмма с фильтром (кнопкой) для некоторой другой переменной (ggplot2 и plotly)

Question

Я использую набор данных mtcars в качестве примера.

library(tidyverse)
library(plotly)

plot <- mtcars %>% 
  ggplot() + 
  geom_histogram(aes(mpg), binwidth = 3) 

ggplotly(plot)

Я хотел бы включить фильтр, например, переменную am, чтобы я мог легко обновлять графики, чтобы на графике отображались только те же гистограммы, но только для am==1и т.д. Итак, я бы хотел кнопку на графике, чтобы я мог сделать фильтр.

Answer 1

Ну, это работает:

library(plotly)
mtcars %>% 
  plot_ly(x = ~mpg ) %>%
  add_histogram(frame=~am)

"рамка" создает слайдер ...

Answer 2

@ Дэвид Я думаю, что означает @marco с триггером в коде:

 plot <- mtcars %>% 
  filter(am == 1) %>% 
  ggplot() + 
  geom_histogram(aes(mpg), binwidth = 3) +
  facet_wrap(~cyl) 

Вы можете просто предоставить простой фильтр dplyr: перед тем, как вы начнете создавать график, это не даст вам кнопки.

Решает ли это вашу проблему?