情節分組條形圖不顯示負值

Question

背景：我正在更新一個小的Shiny應用程序使用plotly而不是ggplot2爲了使圖表交互。 （注：我對R比較新）。

問題：我使用的分組條形圖有時會混合使用正值和負值。當使用ggplot2和renderPlot時，我的圖表按預期工作。但是，在使用情節模式& renderPlotly時，圖表上的條全部顯示爲正數。當我將鼠標懸停在酒吧上時，我可以看到負面的價值。

樣品的編號：

dat1 <- data.frame(
    Item = factor(c("Female","Female","Male","Male")), 
    Attributes = factor(c("Lunch","Dinner","Lunch","Dinner"), levels=c("Lunch","Dinner")), 
    Score = c(13.53, 16.81, -16.24, 17.42) 
) 

build_chart <- function(df){ 

    p <- ggplot(df, aes(factor(Attributes), Score, fill=Item)) + 
    geom_bar(stat="identity", position="dodge") + 
    coord_flip() 

    p 
} 

build_chart(dat1) 
ggplotly(build_chart(dat1)) 

插圖：

期望的結果（GGPLOT2）：

plotly結果：

Answer 1

我看到了很多的場合ggplotly（）給出了意想不到的效果。這是一個不完美的界面，有時很有效，但經常出現小故障。你可以很容易地直接繪製圖形。直接使用plotly API，而不是通過ggplot還具有的優點是它可以讓你獲得了大量的圖表屬性不能用ggplot

plot_ly(dat1, type = "bar", x=Score, y=Attributes, group=Item, orientation="h")