image: Display a pseudo-image of a microarray chip
In benilton/oligo-release: Preprocessing tools for oligonucleotide arrays.

Produces a pseudo-image (graphics::image) for each sample.

## S4 method for signature 'FeatureSet'
image(x, which, transfo=log2, ...)

## S4 method for signature 'PLMset'
image(x, which=0,
                   type=c("weights","resids", "pos.resids","neg.resids","sign.resids"),
                   use.log=TRUE, add.legend=FALSE, standardize=FALSE,
                   col=NULL, main, ...)

`x`	`FeatureSet` object
`which`	integer indices of samples to be plotted (optional).
`transfo`	function to be applied to the data prior to plotting.
`type`	Type of statistics to be used.
`use.log`	Use log.
`add.legend`	Add legend.
`standardize`	Standardize residuals.
`col`	Colors to be used.
`main`	Main title.
`...`	parameters to be passed to `image`

if(require(oligoData) & require(pd.hg18.60mer.expr)){
  data(nimbleExpressionFS)
  par(mfrow=c(1, 2))
  image(nimbleExpressionFS, which=4)
##  fit <- fitPLM(nimbleExpressionFS)
##  image(fit, which=4)
  plot(1) ## while fixing fitPLM TODO
}