deletions | additions
diff --git a/data/plot.R b/data/plot.R
index c862fbf..2d8f021 100755
--- a/data/plot.R
+++ b/data/plot.R
...
facet_grid(nshards~initusers, labeller=label_pretty)
, name='avg_latency_explore', w=8, h=6)
# subset(d.u, select=c('nshards','nclients','Graph','Concurrency Control','abort_rate','throughput'))
save(
ggplot(d.u, aes(
...
, name='txn_counts', w=4, h=3)
d.m d.s <-
melt(subset(d, ccmode subset(d, nshards == 4 & initusers ==
'simple'), 4096)
d.m <- melt(d.s,
measure=c(
'retwis_newuser_success',
'retwis_post_success',
'retwis_repost_success',
'retwis_timeline_success',
'retwis_follow_success'
)
...
))+
ylab('success rate')+
# geom_meanbar()+
# stat_summary(fun.y='mean', geom='smooth')+
stat_smooth()+
common_layers+
# facet_wrap(~facet)
facet_grid(Graph~ccmode, labeller=label_pretty)
, name='txn_breakdown', w=8, h=6)
d.m <-
melt(subset(d, ccmode == 'simple'), melt(d.s,
measure=c(
'retwis_newuser_retries',
'retwis_post_retries',
'retwis_repost_retries',
'retwis_timeline_retries',
'retwis_follow_retries'
)
...
ylab('retries')+
stat_smooth()+
common_layers+
facet_grid(nshards~initusers, # facet_wrap(~facet)
facet_grid(Graph~ccmode, labeller=label_pretty)
, name='txn_breakdown_retries', w=8, h=6)