Support for plotly in R

[ZhaonanFang]

Hi there,

I’m wondering if ggdist is compatible with plotly, or if there are any plans to support this.

Specifically, I wanted to convert the raincloud plot with ggdist to an interactive plotly object with ggplotly().

set.seed(12345) # for reproducibility

p <- tibble(
  abc = rep(c("a", "b", "b", "c"), 50),
  value = rnorm(200, c(1, 8, 8, 3), c(1, 1.5, 1.5, 1))
) %>%
  ggplot(aes(y = abc, x = value, fill = abc)) +
  stat_slab(aes(thickness = after_stat(pdf*n)), scale = 0.7) +
  stat_dotsinterval(side = "bottom", scale = 0.7, slab_linewidth = NA) +
  scale_fill_brewer(palette = "Set2") +
  ggtitle(
    paste0(
      'stat_slab(aes(thickness = after_stat(pdf*n)), scale = 0.7) +\n',
      'stat_dotsinterval(side = "bottom", scale = 0.7, slab_linewidth = NA)'
    ),
    'aes(fill = abc)'
  )

plotly::ggplotly(p)

Thank you.