### R code from vignette source 'vignettes/affylmGUI/inst/doc/extract.Rnw'