From 9e0dd4c716ffd773e5a100ebd8e91e7569a6c46e Mon Sep 17 00:00:00 2001 From: Loic Guegan Date: Fri, 19 Jul 2019 11:15:13 +0200 Subject: Update figure 8 --- 2019-ICA3PP.org | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to '2019-ICA3PP.org') diff --git a/2019-ICA3PP.org b/2019-ICA3PP.org index 4833d84..9ef1151 100644 --- a/2019-ICA3PP.org +++ b/2019-ICA3PP.org @@ -1101,7 +1101,7 @@ applicability of our model. data100=data%>%filter(nbSensors==100)%>%mutate(energy=mean(energy)) %>% slice(1L) data300=data%>%filter(nbSensors==300)%>%mutate(energy=mean(energy)) %>% slice(1L) dataCloud=rbind(data20,data100,data300)%>%mutate(sensorsNumber=nbSensors)%>%mutate(type="Cloud")%>%select(sensorsNumber,energy,type) - + dataCloud=dataCloud%>%mutate(energy=energy/7) # Divide by 7 because 14 core so 1 machine can host 14 vm but we use redundancy (2VM for 1app) # Network data=loadData("./logs/ns3/last/data.csv") @@ -1126,7 +1126,6 @@ applicability of our model. fakeData$type=factor(fakeData$type,ordered=TRUE,levels=c("Sensors","Network","Cloud")) # Plot - fakeData=fakeData%>%mutate(energy=energy/7) # Divide by 7 because 14 core so 1 machine can host 14 vm but we use redundancy (2VM for 1app) 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")) p=applyTheme(p)+theme(text = element_text(size=16)) -- cgit v1.2.3