1 files changed, 25 insertions, 0 deletions
diff --git a/artifacts/2022-09-23-s3ttfb/plot.R b/artifacts/2022-09-23-s3ttfb/plot.R
new file mode 100644
index 0000000..84d4872
--- /dev/null
+++ b/artifacts/2022-09-23-s3ttfb/plot.R
@@ -0,0 +1,25 @@
+library(tidyverse)
+
+
+read_csv("garage-v0.7.csv") %>% add_column(daemon="garage 0.7.3") -> a
+read_csv("garage-v0.8.csv") %>% add_column(daemon="garage 0.8.0 beta") -> b
+read_csv("minio-20220917.csv") %>% add_column(daemon="minio RELEASE.2022-09-17") -> c
+bind_rows(a,b,c) %>% mutate(ms = nanoseconds / 1000 / 1000) -> d
+
+ggplot(d, aes(y = ms, group = daemon, fill=daemon)) +
+  #geom_violin(trim = TRUE, width=2) + 
+  geom_histogram(binwidth=50) +
+  scale_y_continuous(expand=c(0,0))+
+  scale_x_continuous(expand=c(0,0))+
+  coord_flip() + 
+  labs(
+    y="TTFB (ms)",
+    x="Count",
+    fill="Daemon",
+    caption="Get the code to reproduce this graph at https://git.deuxfleurs.fr/Deuxfleurs/mknet",
+    title="TTFB (Time To First Byte) on GetObject over a slow network (5 Mbps)",
+    subtitle="A 1MB file is uploaded and then fetched 60 times.\nExcept for Minio, the queried node does not store any data (gateway) to force net. communications.") +
+  theme_classic() +
+  theme(legend.position = c(.15, .8))
+
+ggsave("./plot.png", width=200, height=110, units="mm")