diff --git a/Readme.md b/Readme.md
index 723c8f3..d570348 100644
--- a/Readme.md
+++ b/Readme.md
@@ -152,6 +152,34 @@
 ```
 ![](./man/figures/Readme-Example-3.png)<!-- -->
 
+### Actions per month from Jan 2019 until the end of last month saved as PNG
+```R
+library(matomor)
+library(idsThemeR)
+library(lubridate)
+library(tidyverse)
+end_of_last_month <- floor_date(Sys.Date(), "month") - 1
+
+getVisitsSummary("https://stats.xxx.de/", siteId = c(13,14), period="month",
+  date=paste0("2019-01-01,", end_of_last_month)) %>%
+      mutate(Service = case_when(site_id == 13 ~ "Angebot A", site_id == 14 ~ "Angebot B")) %>%
+      ggplot(aes(date, nb_actions, col = Service, group = Service)) +
+      scale_x_date(date_labels = "%b %y") +
+      theme_ids() +
+      scale_color_ids() +
+      xlab("") +
+      ylab("Abfragen") +
+      labs(color = NULL) +
+      scale_y_continuous(labels = scales::label_number_si()) +
+      geom_point() +
+      geom_line()
+
+ggsave("./man/figures/AB-actions.png", width = 70 * .pt, height = 30 * .pt,  units = "mm", dpi = 600)
+
+```
+
+![](./man/figures/AB-actions.png)<!-- -->
+
 ## Development and License
 
 **Authors**: [Marc Kupietz](http://www1.ids-mannheim.de/zfo/personal/kupietz/)
diff --git a/man/figures/AB-actions.png b/man/figures/AB-actions.png
new file mode 100644
index 0000000..a74f275
--- /dev/null
+++ b/man/figures/AB-actions.png
Binary files differ