From 4aa31ba8b5d9ac17a0d969f0b02eb9d317591667 Mon Sep 17 00:00:00 2001
From: Quentin Dufour <quentin@deuxfleurs.fr>
Date: Fri, 16 Feb 2024 18:55:46 +0100
Subject: Add datasets

---
 tests/emails/report.R | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100644 tests/emails/report.R

(limited to 'tests/emails/report.R')

diff --git a/tests/emails/report.R b/tests/emails/report.R
new file mode 100644
index 0000000..928597a
--- /dev/null
+++ b/tests/emails/report.R
@@ -0,0 +1,14 @@
+library(tidyverse)
+library(lubridate)
+read_csv("imap_commands_summary.csv") -> cmd
+
+ggplot(cmd, aes(x=command, y=count)) + 
+  geom_bar(stat = "identity")+ 
+  theme_classic() +
+  facet_wrap(~aggregation, ncol=1, scales = "free")
+
+read_csv("mailbox_email_sizes.csv") -> mbx
+ggplot(mbx, aes(x=size, colour=mailbox)) + 
+  stat_ecdf(pad=FALSE,geom = "step") +
+scale_x_log10()+  theme_classic()
+  
-- 
cgit v1.2.3