Description Usage Arguments Value Author(s) See Also Examples
Given GeneRankings
or AggregatedRankings
obtained from
several ranking procedures, the aim is to find is a unifying output. A
threshold equal to the maximum rank/list position which is still relevant
for the question of interest may be provided by the user, or the threshold can adaptively be determined
via significance analysis in multiple testing procedures. Then, all genes are checked whether
their ranks fall below this threshold consistenly in all
ranking procedures used. If this holds, then the gene is selected.
A final order of the genes is defined by the following
criteria
A user-defined ranking of the used ranking procedures, i.e. the user decides which statistic he or she considers most important.
'Selection', i.e. falling below the threshold.
The obtained ranks. The rank from the most important ranking procedure is considered, then that from the second most important, and so on.
1 2 3 4 | GeneSelector(Rlist, ind = NULL, indstatistic = 1:length(Rlist),
threshold = c("user", "BH", "qvalue", "Bonferroni", "Holm",
"Hochberg", "SidakSS", "SidakSD", "BY"),
maxrank = NULL, maxpval = 0.05)
|
Rlist |
A list of objects of class |
ind |
Indices of genes to be considered. Defaults to all. |
indstatistic |
An index vector defining the importance of the
elements of |
threshold |
Determination of the threshold (s. description). Can be either
In the latter case, the p-values of the element of
|
maxrank |
A positive integer specifying a user-defined threshold. |
maxpval |
Specified if |
An object of class GeneSelectorOutput.
Martin Slawski
Anne-Laure Boulesteix
GeneRanking, AggregatedRanking
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 | ## Load toy gene expression data
data(toydata)
### class labels
yy <- toydata[1,]
### gene expression
xx <- toydata[-1,]
### Get Rankings from five different statistics
ordinaryT <- RankingTstat(xx, yy, type="unpaired")
baldilongT <- RankingBaldiLong(xx, yy, type="unpaired")
samT <- RankingSam(xx, yy, type="unpaired")
wilc <- RankingWilcoxon(xx, yy, type="unpaired")
wilcebam <- RankingWilcEbam(xx, yy, type="unpaired")
### form a list
LL <- list(ordinaryT, baldilongT, samT, wilc, wilcebam)
### order statistics (assign importance)
ordstat <- c(3,4,2,1,5)
### start GeneSelector, threshold set to rank 50
gk50 <- GeneSelector(LL, indstatistic=ordstat, maxrank=50)
### start GeneSelector, using adaptive threshold based on p-values,
### here using the multiple testing procedure of Hochberg
gkpval <- GeneSelector(LL, indstatistic=ordstat, threshold = "BH", maxpval=0.05)
### show results
show(gkpval)
str(gkpval)
toplist(gkpval)
### which genes have been selected ?
SelectedGenes(gkpval)
### Detailed information about gene 4
plot(gkpval, which=4)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.