### R code from vignette source 'intro.Rnw'