##################################################################
 ##
 ## file: rma.background.correct.R
 ##
 ## implements the normal boackground + exponential signal background
 ## correction traditionally used in RMA computations
 ##
 ## for more details see
 ##  Bolstad, BM (2004) Low Level Analysis of High-density Oligonucleotide Array Data: Background, Normalization and Summarization. Dissertation. University of California, Berkeley.
 ## pages 17-21
 ##
 ##
 ## History 
 ## Mar 22, 2008 - Initial version (in preprocessCore)
 ##
 ##
 
 rma.background.correct <- function(x,copy=TRUE){
 
   rows <- dim(x)[1]
   cols <- dim(x)[2]
 
   if (!is.matrix(x)){
     stop("Matrix expected in normalize.quantiles")
   }
 
   if (is.integer(x)){
     x <- matrix(as.double(x),rows,cols)
     copy <- FALSE
   }
 
   .Call("R_rma_bg_correct", x, copy, PACKAGE="preprocessCore");
 }