2016-02-11 3 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

Замена c(0:0.5) с c(0, 0.5) в scale_y_discrete может помочь, потому что для limits вы должны дать начальную точку и конечную точку, в то время как 0:0.5 возвращается просто 0.

+0

Спасибо, Юлий! Обычно я могу исправить вещи, просматривая предыдущие Qstions. На этот раз мне потребовались часы, ваша помощь была значительно оценена. – rsustain