使用ggplot2和plotly的水平条形图

Question

给定的图使用ggplot2和plotly生成条形图。我想用ggplotly（p）创建一个类似的水平条形图。尝试使用geom_bar（）中的属性coord_flip（）但没有帮助。请帮助我，谢谢。

library(plotly)
dat <- data.frame(
time = factor(c("Lunch","Dinner"), levels=c("Lunch","Dinner")),
total_bill = c(14.89, 17.23))
p <- ggplot(data=dat, aes(x=time, y=total_bill)) +
geom_bar(stat="identity")
p <- ggplotly(p)

Answer 1

如果安装ggp​​lot2的开发版本，可以在绘图对象中将方向更改为水平（如here所述）：

p <- ggplot(data=dat, aes(x=time, y=total_bill)) +
  geom_bar(stat="identity") +
  coord_flip()

l = plotly_build(p)
l$data[[1]]$orientation <- "h"
l