diff --git a/vignettes/atom-plots.Rmd b/vignettes/atom-plots.Rmd
index fc73dadb..55dc3519 100644
--- a/vignettes/atom-plots.Rmd
+++ b/vignettes/atom-plots.Rmd
@@ -1,8 +1,7 @@
 ---
 title: "Atom plots"
-output: 
-  rmarkdown::html_vignette:
-    number_sections: true
+author: "OSPSuiteR 2019"
+output: rmarkdown::html_vignette
 vignette: >
   %\VignetteIndexEntry{atom-plots}
   %\VignetteEngine{knitr::rmarkdown}
@@ -169,7 +168,7 @@ pScatter3 <- addScatter(x = myTestData$x[females],
                         plotObject = pScatter1)
 ```
 
-```{r, echo=FALSE, fig.cap="Left: pScatter1; Middle: pScatter2; Right: pScatter3", fig.width=7.5}
+```{r show addScatter, echo=FALSE, fig.cap="Left: pScatter1; Middle: pScatter2; Right: pScatter3", fig.width=7.5}
 gridExtra::grid.arrange(pScatter1, pScatter2, pScatter3, ncol=3)
 ```
 
@@ -203,8 +202,14 @@ pLine3 <- addLine(y = c(-1, 1),
                   plotObject = pLine1)
 ```
 
-```{r show addLine, echo=FALSE, fig.cap="Left: pLine1; Middle: pLine2; Right: pLine3", fig.width=7.5}
-gridExtra::grid.arrange(pLine1, pLine2, pLine3, ncol=3)
+```{r pLine1, echo=FALSE, fig.cap="pLine1", fig.width=7.5}
+pLine1
+```
+```{r pLine2, echo=FALSE, fig.cap="pLine2", fig.width=7.5}
+pLine2
+```
+```{r pLine3, echo=FALSE, fig.cap="pLine3", fig.width=7.5}
+pLine3
 ```
 
 # Add ribbon or errorbars to a plot object: *addRibbon*, *addErrorbar*