R - 將 ggplot 餅圖轉換為 plotly

Question

我在 plotly 中嘗試創建相同的 ggplot 餅圖時遇到問題，因為我需要 plotly 的交互式懸停功能來查看餅圖段的詳細信息。

由於geom_bar的存在（我的理解），它似乎會將 gpplot 餅圖渲染為條形圖。

我有以下代碼：

g2 <- ggplot( data = DT, aes( x = 1, y = percentage, fill = as.factor( operationtype ) ) ) +
  geom_bar( width = 1, stat = "identity" ) +
  facet_wrap( ~deviceid, ncol = 1 ) +
  coord_polar(theta = "y", start=0) +
  theme(axis.title.x = element_blank(),
        axis.text.x  = element_blank(),
        axis.ticks.x = element_blank(),
        axis.title.y = element_blank(),
        axis.text.y  = element_blank(),
        axis.ticks.y = element_blank(),) + 
  labs( fill = "status" )
plot2 <- ggplotly(g2)

其中 g2 是 ggplot 餅圖：

但是在執行plot2 <- ggplotly(g2) ，plot2 變成了條形圖：

如何以 plotly 呈現相同的餅圖？

Answer 1

最好使用plot_ly創建pie-chart ，如下所示：

# Create fake data
  df <- data.frame(
    genre=c("Pop", "HipHop", "Latin", "Jazz"), 
    values = c(33,22,25,20)
  )
    
  plot_ly(data=df,labels=~genre, values=~values, type="pie") %>% 
    layout(title = 'United States Music Genre Prevalent in 1999',
           xaxis = list(showgrid = FALSE, zeroline = FALSE, showticklabels = FALSE),
           yaxis = list(showgrid = FALSE, zeroline = FALSE, showticklabels = FALSE))

然后使用subplot()組合多個圖。