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