diff --git a/examples/ids.Rmd b/examples/ids.Rmd
index 77932fb..a7e62f7 100644
--- a/examples/ids.Rmd
+++ b/examples/ids.Rmd
@@ -61,7 +61,7 @@
 
 ## Slide with Plot
 
-```{r pressure}
+```{r pressure, fig.height=5, fig.width=12, message=F, warning=F}
 plot(pressure)
 ```
 
@@ -75,32 +75,16 @@
   read_tsv("http://www.ids-mannheim.de/cosmas2/projekt/intstats/registrierungen.csv") %>%
   add_column(group = "registered users")
 
-  hc <- registrierungen %>%
-    hchart("line", hcaes(x=date, y=registered, group=group)) %>%
-    hc_add_theme(hc_theme_ids_light()) %>%
-    hc_yAxis(title=list(text="")) %>%
-    hc_xAxis(title=list(text="")) %>%
-     hc_legend(element_blank()) %>%
-    hc_size(height=500, width=1260)
-  hc
-
+hc <- registrierungen %>%
+  hchart("line", hcaes(x = date, y = registered, group = group)) %>%
+  hc_add_theme(hc_theme_ids_light()) %>%
+  hc_yAxis(title = list(text = "")) %>%
+  hc_xAxis(title = list(text = "")) %>%
+  hc_legend(element_blank()) %>%
+  hc_size(height = 500, width = 1260)
+hc
 ```
 
-## Light Verb Constructions
-### with *take* in ICC-English
-
-```{r take-icc, fig.cap="Collocation analysis results for *take* + NOUN in [English Wikipedia](https://korap.ids-mannheim.de/instance/english), using the RKorAPClient  [@kupietz_rkorapclient_2020] package."}
-take_ca_icc <-
-  KorAPConnection(("https://korap.ids-mannheim.de/instance/english/")) %>%
-  collocationAnalysis(
-    "focus({[tt/l=take]} [tt/p=NOUN])",
-    leftContextSize = 0,
-    rightContextSize = 1,
-    addExamples = T
-  ) %>% head(7)
-
-take_ca_icc %>% show_table()
-```
 
 ## Source Code
 ### Collocation Analysis