mirror of
https://gitlab.com/manzerbredes/loosely-coupled-dss-extended.git
synced 2025-06-26 23:37:41 +00:00
Integrate analysis
This commit is contained in:
parent
0a125c3661
commit
dbdcb14449
8 changed files with 362 additions and 41793 deletions
|
@ -23,14 +23,24 @@ ts_range=seq(0, 24)*3600
|
|||
ts_labels=ts_range/3600
|
||||
|
||||
# Plot
|
||||
p1=ggplot(data,aes(x=wakets,y=node))+
|
||||
geom_hline(aes(yintercept=node),color="grey",size=3)+
|
||||
geom_vline(data=hint,aes(xintercept=wakets,color="Hint slots"),show.legend = FALSE,linetype="longdash",size=0.3)+
|
||||
geom_linerange(aes(xmin=wakets,xmax=sleepts),size=10)+
|
||||
geom_linerange(data=hint,aes(xmin=wakets,xmax=wakets+duration,color="Hint slots"),size=10)+
|
||||
geom_point(data=data_rcv,aes(x=ts,color="Data received"),shape=18,size=4)+
|
||||
geom_point(data=hint,aes(x=rcvat,color="Hint received"),shape=18,size=3)+
|
||||
geom_point(data=hint_fw,aes(x=ts,color="Hint Forwarded"),shape=18,size=2)+
|
||||
p1=ggplot(data,aes(x=wakets,y=node)) + geom_hline(aes(yintercept=node),color="grey",size=3)
|
||||
if(NROW(hint)!=0){
|
||||
p1=p1+geom_vline(data=hint,aes(xintercept=wakets,color="Hint slots"),show.legend = FALSE,linetype="longdash",size=0.3)
|
||||
}
|
||||
p1=p1+geom_linerange(aes(xmin=wakets,xmax=sleepts),size=10)
|
||||
if(NROW(hint)!=0){
|
||||
p1=p1+geom_linerange(data=hint,aes(xmin=wakets,xmax=wakets+duration,color="Hint slots"),size=10)
|
||||
}
|
||||
if(NROW(data_rcv)!=0){
|
||||
p1=p1+geom_point(data=data_rcv,aes(x=ts,color="Data received"),shape=18,size=4)
|
||||
}
|
||||
if(NROW(hint)!=0){
|
||||
p1=p1+geom_point(data=hint,aes(x=rcvat,color="Hint received"),shape=18,size=3)
|
||||
}
|
||||
if(NROW(hint_fw)!=0){
|
||||
p1=p1+geom_point(data=hint_fw,aes(x=ts,color="Hint Forwarded"),shape=18,size=2)
|
||||
}
|
||||
p1=p1+
|
||||
xlab("Time (hours)")+ylab("Node")+
|
||||
scale_x_continuous(breaks = ts_range, labels=ts_labels)+
|
||||
scale_colour_manual(name="Legend",values=c("Hint slots"="blue","Data received"="red","Hint received"="green","Hint Forwarded"="purple"))+
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue