使用Crosstalk和Plotly过滤直方图而不使用group参数

问题描述

我正在创建一个项目,希望将交互式直方图嵌入到从R Markdown文档生成的html页面中。由于与交互式直方图的数量和潜在的使用量相关的成本,因此Shiny在该项目中不是可行的方法,因此,我试图为交互式直方图嵌入html小部件,该小部件可以使用{{3 }}和Crosstalk。到目前为止,在group中使用ggplot(aes())参数时,我已经能够创建可过滤的直方图(下面包含了reprex)。最终,我想使用多个变量来过滤直方图,如果我使用的是group参数,则会引起问题。

有没有一种方法可以使用Crosstalk和Plotly过滤直方图而无需使用group参数?

谢谢!

library(crosstalk)
library(plotly)
library(reprex)

shared_mtcars <- SharedData$new(mtcars)
bscols(widths = c(3,NA),list(
         filter_checkBox("cyl","Cylinders",shared_mtcars,~cyl,inline = TRUE)
       ),plotly::ggplotly(shared_mtcars %>% 
                          ggplot(aes(x = mpg,group = factor(cyl))) + 
                          geom_histogram(fill = "pale green",color = "black") + 
                          theme(legend.position = "none"))
)

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)