R ggplot和plotly中的错误

当我尝试使用plotly的界面在r-Shining上使用ggplot绘制双条形图时，双条形图从随机位置获取数据，无法正确绘制绘图

我在单条形图上使用过这个界面，它工作得很好，正确地显示了数据和图形，但在双条形图上，它只使用随机数据？常规ggplot很好，但当我将其转换为plotly时，它会出错

output$tvpn <- renderPlotly({

     mpolfinal4$Partner.Name= factor(mpolfinal4$Partner.Name,
                                       levels=names(sort(table(mpolfinal4$Partner.Name),
                                                    decreasing=TRUE)))
     tv =  ggplot(mpolfinal4, aes(x =Partner.Name, fill=Domain.Name)) +
             geom_bar(colour="black") + 
             theme(axis.text.x=element_text(angle=90,hjust=1)) + 
             ggtitle("Total Views by Partner Name, and Domain Name")

     out = ggplotly(tv)
     out
  })

output$tvpn您能否提供一些数据（一个示例数据帧）来重现错误，并将其发布在github.com/ropensci/plotly/issues？谢谢vs第一个链接用于plotly graph，无序，错误的数字您能否提供一些数据（示例数据框）来重现错误并将其发布在github.com/ropensci/plotly/issues？谢谢vs第一个链接用于绘图、无序、错误的数字