Update plots.

bin/data-plots.R

@@ -127,9 +127,9 @@ ggplot(data = d_total_long %>% filter(lclass != "Total",
            color = fct_reorder2(lclass, Date, count))) +
     geom_line() +
     geom_point(size = 0.3) +
-    scale_x_date(date_breaks = "10 years",
+    scale_x_date(date_breaks = "3 months",
-                 date_minor_breaks = "1 year",
+                 date_minor_breaks = "1 month",
-                 date_labels = "%Y") +
+                 date_labels = "%Y-%m") +
     scale_y_continuous(labels = scales::comma) +
     scale_color_colorblind() +
     theme_bw() +