plot_ly(revenue,x=~游戏名称,y=~本周,type="bar",name="本周")
plot_ly(revenue,x=~游戏名称,y=~本周,type="bar",name="本周")%>%
add_trace(y=~上周,name="上周")
layout(barmode='stack',xaxis=list(title=""),yaxis=list(title=""),
title="游戏收入数据")
plot_ly(revenue,x=~游戏名称,y=~本周,type="bar",name="本周")
plot_ly(revenue,x=~游戏名称,y=~本周,type="bar",name="本周")%>%
add_trace(y=~上周,name="上周")
layout(barmode='stack',xaxis=list(title=""),yaxis=list(title=""),
title="游戏收入数据")