diff --git a/2019-ICA3PP.org b/2019-ICA3PP.org index a87c9fc..a18c277 100644 --- a/2019-ICA3PP.org +++ b/2019-ICA3PP.org @@ -1222,14 +1222,13 @@ Our usecase: for one sensor # Plot p=ggplot(fakeData)+geom_bar(position="dodge2",colour="black",aes(x=sensorsNumber,y=energy,fill=type),stat="identity")+ - xlab("Sensors Number")+ylab("Power Consumption (W)")+guides(fill=guide_legend(title="System Part")) + xlab("Number of Sensors")+ylab("Power Consumption (W)")+guides(fill=guide_legend(title="System Part")) p=applyTheme(p)+theme(text = element_text(size=16)) ggsave("plots/final.png",dpi=90,width=8,height=5.5) write.csv(last_plot()$data,file=paste0("/home/loic/aa",".csv")) #+END_SRC #+RESULTS: - [[file:plots/final.png]] @@ -1341,15 +1340,14 @@ Our usecase: for one sensor data=data%>%group_by(sendInterval)%>%mutate(avgEnergy=mean(energy))%>%ungroup() print(data) - p=ggplot(data,aes(x=time, y=energy)) + geom_line()+facet_wrap(~sendInterval)+expand_limits(y=c(0,40))+ylab("Server power consumption (W)")+ + p=ggplot(data,aes(x=time, y=energy)) + geom_line()+facet_wrap(~sendInterval,ncol=1)+expand_limits(y=c(0,40))+ylab("Server power consumption (W)")+ xlab("Experiment Time (s)")+geom_hline(aes(yintercept=avgEnergy),color="Red",size=1.0) p=applyTheme(p) - ggsave("plots/sendInterval-cloud.png",dpi=120,height=3,width=6) + ggsave("plots/sendInterval-cloud.png",dpi=120,height=6,width=8) #+END_SRC #+RESULTS: - [[file:plots/sendInterval-cloud.png]] * Emacs settings :noexport: diff --git a/plots/final.png b/plots/final.png index fce0002..f6f71be 100644 Binary files a/plots/final.png and b/plots/final.png differ diff --git a/plots/sendInterval-cloud.png b/plots/sendInterval-cloud.png index 48d0504..0e59ec1 100644 Binary files a/plots/sendInterval-cloud.png and b/plots/sendInterval-cloud.png differ