diff --git a/R/report.Rmd b/R/report.Rmd
index b730917..6320eda 100644
--- a/R/report.Rmd
+++ b/R/report.Rmd
@@ -34,8 +34,8 @@
 ## Composition by date of publication
 
 
-```{r composition_by_pubdate}
-year <- c(1988:2023)
+```{r composition_by_pubdate, message=F, warning=F}
+year <- c(1986:2023)
 
 icc_year <- icc %>%
   expand_grid(year) %>%
@@ -44,8 +44,14 @@
   mutate(tokens= corpusStats(icc_con(lang, token), vc = vc)@tokens)
 
 icc_year %>% ggplot(aes(x=year, fill=lang, color=lang, y=tokens)) +
-  geom_line() +
-  geom_point() +
+  # geom_smooth(se=F, span=0.25) +
+  xlim(1990, 2023) +
+  ylim(0, NA) +
+  stat_smooth(
+        geom = 'area', method = 'loess', span = 1/4,
+        alpha = 0.1) +
+  # geom_area(alpha=0.1,  position = "identity") +
+  scale_fill_ids() + scale_colour_ids() + 
   scale_y_continuous(labels = label_number(scale_cut = cut_short_scale())) +
   theme_ids()
 ```
