Description Usage Arguments Details Author(s) See Also Examples
Creates an image for each sample for the selected device.
1 2 3 4 5 6 7 8 9 10 11 12 |
x |
object of class |
type |
character string specifying the type of image. |
qualopt |
character string specifying whether to draw residual image for “raw”, “adjusted”, or “normalized” intensities. |
transfo |
a valid function to transform the data, usually “log2”, or “0”. |
col |
color range for intensities. |
names |
vector of sample names. |
dev |
graphics device to plot to, i.e. one of “screen”, “jpeg”,“png”, “pdf” or “ps”. |
outfile |
the name of the output file. |
w |
the width of the device in pixels. |
h |
the height of the device in pixels. |
verbose |
logical, if |
... |
optional arguments to be passed to |
Creates intensity image(s) or residual image(s), respectively, for each array for the
selected graphics device, see image
for more details.
For intensity image(s) type
must be one of “intensity”.
For residual image(s) type
must be one of “resids”,“pos.resids”,
“neg.resids”, “sign.resids”, or “weights”. Furthermore, qualopt
determines if images should be drawn for “raw”, “adjusted”, or “normalized”
data.
For names="*"
names of all samples will be displayed as images. If names
is a vector of column names, only these samples will displayed as image(s).
Christian Stratowa
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 | ## Not run:
## first, load ROOT scheme file and ROOT data file
scheme.test3 <- root.scheme(paste(path.package("xps"),"schemes/SchemeTest3.root",sep="/"))
data.test3 <- root.data(scheme.test3, paste(path.package("xps"),"rootdata/DataTest3_cel.root",sep="/"))
## qualification - rlm
rlm.all <- rmaPLM(data.test3, "tmp_Test3RLMall", filedir=getwd(), tmpdir="", qualopt="all", option="transcript", add.data=FALSE)
if (interactive()) {
## image(s) of raw data
plotImage(data.test3, type="intensity", names="*")
plotImage(data.test3, type="intensity", names="TestA2.cel")
## image(s) of residuals/weights
plotImage(rlm.all, type="weights", names="*")
plotImage(rlm.all, type="weights", qualopt="adjusted", names="*")
plotImage(rlm.all, type="resids", names="TestA2_raw.res")
}
## function image.dev() will be deprecated since it needs attachInten!!
## need to attach scheme mask and data
data.test3 <- attachMask(data.test3)
data.test3 <- attachInten(data.test3)
if (interactive()) {
image.dev(data.test3)
}
## to avoid memory comsumption of R remove data:
data.test3 <- removeInten(data.test3)
data.test3 <- removeMask(data.test3)
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.