### R code from vignette source 'vignettes/webbioc/inst/doc/demoscript.Rnw'