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