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