loic/loosely-coupled-dss-extended
1
0
Fork 0
mirror of https://gitlab.com/manzerbredes/loosely-coupled-dss-extended.git synced 2025-06-26 23:37:41 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Debug

Browse source
This commit is contained in:
Loic Guegan 2021-06-10 17:31:41 +02:00
parent dbdcb14449
commit 82b5b6a076
29 changed files with 42136 additions and 580 deletions
Download patch file Download diff file Expand all files Collapse all files

20
results/scheduler/wakeup.R
View file

@ -42,14 +42,24 @@ if(NROW(hint_fw)!=0){
}
p1=p1+
xlab("Time (hours)")+ylab("Node")+
scale_x_continuous(breaks = ts_range, labels=ts_labels)+
scale_x_continuous(breaks = ts_range, labels=ts_labels,expand = c(0, 0))+
scale_colour_manual(name="Legend",values=c("Hint slots"="blue","Data received"="red","Hint received"="green","Hint Forwarded"="purple"))+
theme(panel.grid.major.x = element_line(size = 1.2),panel.grid.major.y = element_blank(),panel.grid.minor = element_blank())
stats=data%>%group_by(node)%>%summarise(n=n())%>%mutate(n=n-24)
stats=data%>%group_by(node)%>%summarise(n=n())%>%mutate(nwakeup=n-24)
p2=ggplot(stats,aes(x=node,y=n))+
geom_bar(stat="identity")+xlab("Node")+ylab("Extra wake up count")
p2=ggplot(stats,aes(x=node,y=nwakeup))+
geom_bar(stat="identity")+xlab("Node")+ylab("Extra wake up count")+ylim(0,10)+
scale_y_continuous(breaks = seq(0,10))
p=grid.arrange(p1,p2,heights=c(10,5))
stats2=tibble(
metric=c("Hint Received","Hint Forwarded","Data Received"),
count=c(NROW(hint),NROW(hint_fw),NROW(data_rcv))
)
p3=ggplot(stats2,aes(x=metric,y=count))+
geom_bar(stat="identity")+xlab("Metric")+ylab("Count")+ylim(0,20)
p=grid.arrange(p1,p2,p3,heights=c(10,5,5))
ggsave(plot=p,"schedule.png",dpi=300,width = 10,height=10)