julian.kunkel
/
ddn-ime-evaluation
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Performance overview

This commit is contained in:
Eugen Betke 2018-10-24 18:57:56 +02:00
parent 21fdfa9ebb
commit 3af9993a66
1 changed files with 12 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
benchmark/eval_analysis.R
View File

@ -30,7 +30,7 @@ connection = dbConnect(SQLite(), dbname=file_db)
#dbdata = dbGetQuery(connection,'select * from p where tag=="mpio-individual"')
#dbdata = dbGetQuery(connection,'select *, (x*y*z) as blocksize from p where count=8')
#dbdata = dbGetQuery(connection,'select * from p where count<5')
dbdata = dbGetQuery(connection,'select * from p')
dbdata = dbGetQuery(connection,'select * from p where (ppn==1 or ppn=4 or ppn=8) and striping="yes"' )
dbdata[,"blocksize"] = dbdata$tsize
@ -60,18 +60,18 @@ for (scale in c("linear", "logarithmic")) {
fss = unique(dbdata$fs)
for (fs in fss) {
data1 = dbdata[fs == dbdata$fs, ]
apis = unique(data1$api)
#apis = unique(data1$api)
print(fs)
for (api in apis) {
data2 = data1[api == data1$api, ]
apps = unique(data2$app)
#for (api in apis) {
#data2 = data1[api == data1$api, ]
apps = unique(data1$app)
print(api)
#print(api)
for (app in apps) {
data3 = data2[app == data2$app, ]
data3 = data1[app == data1$app, ]
iotypes = unique(data3$iotype)
print(app)
@ -83,7 +83,7 @@ print(iotype)
p = ggplot(data=data, aes(x=nn, y=perf, colour=as.factor(blocksize/1024), group=blocksize), ymin=0) +
#ggtitle("Write") +
facet_grid(ppn ~ accesstype + striping, labeller = labeller(nn = as_labeller(nn_lab), ppn = as_labeller(ppn_lab))) +
facet_grid(ppn ~ api + accesstype, labeller = labeller(nn = as_labeller(nn_lab), ppn = as_labeller(ppn_lab))) +
xlab("Nodes") +
ylab("Performance in MiB/s") +
theme(axis.text.x=element_text(angle=90, hjust=0.95, vjust=0.5)) +
@ -100,10 +100,10 @@ print(iotype)
p = p + scale_y_log10()
}
filename_eps = sprintf("%s/performance_%s_%s_%s_%s_%s_%s.eps", folder_out, app, fs, api, iotype, "write", scale)
filename_png = sprintf("%s/performance_%s_%s_%s_%s_%s_%s.png", folder_out, app, fs, api, iotype, "write", scale)
ggsave(filename_png, width = 6, height = 10)
ggsave(filename_eps, width = 6, height = 10)
filename_eps = sprintf("%s/performance_%s_%s_%s_%s_%s.eps", folder_out, app, fs, iotype, "write", scale)
filename_png = sprintf("%s/performance_%s_%s_%s_%s_%s.png", folder_out, app, fs, iotype, "write", scale)
ggsave(filename_png, width = 10, height = 6)
ggsave(filename_eps, width = 10, height = 6)
#system(sprintf("epstopdf %s", filename_eps))
system(sprintf("rm %s", filename_eps))
@ -134,4 +134,3 @@ print(iotype)
#system(sprintf("rm %s", filename_eps))
}}}}
}