我有条形图来绘制每个地区12个月数据的收入。数据框如下所示:
Month Region Revenue
1 Japan $1,200.49
1 France $71,869.99
1 England $28,009.50
1 Brazil $54,400.95
我的代码是:
Mydata<-read_excel("Revenue.xlsx")
Mydata$Month<-factor(Mydata$Month)
p<-ggplot(data=Mydata,aes(x=Month,y=Revenue,fill=Region))+
geom_bar( stat = "identity")+facet_grid(.~Region)+
geom_hline(yintercept = 60000,color='black',size=1.4)+
scale_y_continuous(labels = scales::dollar)
我设定了60,000美元的生产线作为目标生产线,但实际上每个国家都有不同的目标生产线,例如,日本为2,0000美元,法国为40,000美元。
所以当我使用facet_grid
时,我不知道如何实现这一点我目前的图表是: