Description Usage Arguments Author(s) See Also Examples
Sets the flags on some of the spots.
See also *addFlag()
which adds/removes flags to
already set flags.
1 2 |
flag |
The name of the flag. |
include |
The indices of the spots that should be included.
If it is instead a name of one or more flags, the spots which have been
flagged with these flags are considered.
If |
exclude |
The indices of the spots that should be excluded.
If it is instead a name of one or more flags, the spots which have been
flagged with these flags are excluded.
If |
slide |
Slide(s) to be considered. If |
include.op |
If |
exclude.op |
If |
Henrik Bengtsson (http://www.braju.com/R/)
*addFlag()
,
*getFlag()
,
*clearFlag()
,
*listFlags()
,
*getInclude()
.
For more information see MicroarrayData
.
1 2 3 4 5 6 7 8 9 10 11 12 13 | SMA$loadData("mouse.data")
layout <- Layout$read("MouseArray.Layout.dat", path=system.file("data-ex", package="aroma"))
raw <- RawData(mouse.data, layout=layout)
ma <- getSignal(raw)
normalizeWithinSlide(ma, "s")
tma <- as.TMAData(ma)
setFlag(tma, "Top 5% M's", top(abs(tma$M), 0.05))
setFlag(tma, "Top 5% T's", top(abs(tma$T), 0.05))
setFlag(tma, "Top 5% M's AND top 5% T's", c("Top 5% M's", "Top 5% T's"))
plot(tma)
highlight(tma, "Top 5% M's", col="red")
highlight(tma, "Top 5% T's", col="blue")
highlight(tma, "Top 5% M's AND top 5% T's", col="purple")
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.