2016-02-11 82 views
0
ggplot(data.nona2,aes(x=uur.van.het.jaar,y=Verbruik.huis.overig.kWh))+ 
    labs(color='Scenario') + 
    scale_x_discrete(limits=c(2736:2759), 
        breaks=c(2744,2748,2754,2759), 
        labels=c("08:00","12:00","18:00","24:00"), 
        name='tijd (uren)') + 
    scale_y_discrete(limits=c(0:0.5), 
        breaks=c(0,0.25,0.5), 
        labels=c('0','0.25','0.5'),name='kWh') + 
    scale_colour_brewer(palette="Set1") + 
    coord_cartesian(xlim=c(2736,2759),ylim=c(0,0.5)) + 
    geom_ribbon(data=data.nona2, 
       aes(x=uur.van.het.jaar, 
        ymin=0,ymax=Verbruik.boiler.kWh,scenario, 
        alpha=1,fill="verbruik boiler"),se=F) + 
    geom_ribbon(data=data.nona2, 
       aes(x=uur.van.het.jaar,ymin=0,ymax=Verbruik.huis.overig.kWh, 
        scenario, alpha=.8,fill="verbruik huis"),se=F) + 
    facet_grid(scenario~.,scales='free_y') + 
    geom_ribbon(data=data.nona2, 
       aes(x=uur.van.het.jaar,ymin=0,ymax=PV.opwek.kWh,scenario, 
        alpha=0.7,fill="PV opwek"),se=F) + 
    scale_fill_manual(name = 'Energie verbruik', 
        values=c("verbruik boiler" = "darkred", 
          "verbruik huis" = "darkgreen", 
          'PV opwek' = 'darkblue')) + 
    theme_pander() + 
    guides(group=FALSE) 

enter image description hereY比例已经消失

可惜我不能分享我的实际数据,我知道这将大大apreciated。我已经搜索了很多解决方案,以便我最后的希望能够延伸到阅读本文的任何人。 (我的价值观是连续的)。我该如何解决它?

+1

我们不需要您的实际数据,但我们确实需要一些数据来使这个问题[重复性(http://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible例如),否则很难帮助你。请参阅提供的关于如何做到这一点的链接。 – MrFlick

回答

2

scale_y_discretec(0, 0.5)更换c(0:0.5)也许会有帮助,因为limits你需要给一个起点和一个终点,而0:0.5回报只是0

+0

谢谢Julius!通常我可以通过查看以前的Qstion来解决问题。这一次花了我几个小时,你的帮助已经很多了。 – rsustain