Processor-class {PreProcess} | R Documentation |
A Processor
represents a function that acts on the data of a
some object to process it in some way. The result is always
another related object, which should record some history about
exactly how it was processed.
## S4 method for signature 'Channel, Processor': process(object, action, parameter=NULL) ## S4 method for signature 'Processor': summary(object, ...)
object |
In the process method, a Channel
object. In the summary method, a Processor object |
action |
A Processor object used to process a
Channel . |
parameter |
Any object that makes sense as a parameter to the
function represented by the Processor action |
... |
Additional arguments are as in the underlying generic methods. |
The return value of the generic function process
is always
an object related to its Channel
input, which keeps a record
of its history. The precise class of the result depends on the
function used to create the Processor
.
f
:default
:f
name
:description
:action
to the Channel
object, updating
the history appropriately. If the parameter
is NULL
,
then use the default value.
The library comes with several Processor
objects already
defined; each one takes a Channel
as input and produces a
modified Channel
as output.
PROC.SUBTRACTOR
Channel
.PROC.THRESHOLD
PROC.GLOBAL.NORMALIZATION
Channel
by dividing by a global constant. If the
parameter takes on its default value of 0, then divide by the 75th
percentile.
PROC.LOG.TRANSFORM
PROC.MEDIAN.EXPRESSED.NORMALIZATION
PROC.SUBSET.NORMALIZATION
PROC.SUBSET.MEAN.NORMALIZATION
Kevin R. Coombes <kcoombes@mdanderson.org>
Channel
, process
,
Pipeline
, CompleteChannel
# simulate a moderately realistic looking microarray nc <- 100 nr <- 100 v <- rexp(nc*nr, 1/1000) b <- rnorm(nc*nr, 80, 10) s <- sapply(v-b, max, 1) ct <- ChannelType('user', 'random', nc, nr, 'fake') subbed <- Channel(name='fraud', parent='', type=ct, x=s) rm(ct, nc, nr, v, b, s) # clean some stuff # example of standard data processing nor <- process(subbed, PROC.GLOBAL.NORMALIZATION) thr <- process(nor, PROC.THRESHOLD, 25) processed <- process(thr, PROC.LOG.TRANSFORM, 2) summary(processed) par(mfrow=c(2,1)) plot(processed) hist(processed) par(mfrow=c(1,1)) image(processed) rm(nor, thr, subbed, processed)