Description Usage Arguments Value Author(s) Examples
Identify the gene list common to all single data sets and invoke the subsequent function main.process
.
1 | pred.time.indep.valid(geno.files, surv.data, method = "none", time.dep = 0)
|
geno.files |
A vector of character strings containing the names of gene expression files. |
surv.data |
A list of two vectors, survival time and censoring status. In the censoring status vector, 1 = event occurred, 0 = censored. |
method |
A character string specifying the feature selection method: "none" for top-100 ranking or one of the adjusting methods specified by the p.adjust function. |
time.dep |
An integer 0 or 1, 1 to plot time-dependent ROC curves for different time points and 0 for no plot |
None.
Haleh Yasrebi
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 | require(survJamda.data)
data(gse4335)
data(gse3143)
data(gse1992)
data(gse4335pheno)
data(gse3143pheno)
data(gse1992pheno)
geno.files = c("gse4335","gse1992","gse3143")
surv.data = list(c(gse4335pheno[,6],gse1992pheno[,19],gse3143pheno[,4]),
c(gse4335pheno[,5],gse1992pheno[,18],gse3143pheno[,3]))
#pred.time.indep.valid(geno.files, surv.data)
## The function is currently defined as
function(geno.files, surv.data)
{
common.gene = colnames(get(geno.files[1]))
for (i in 2:length(geno.files))
common.gene = intersect(common.gene, colnames(get(geno.files[i])))
par (mfrow = c(1,length(geno.files)))
par(oma=c(2,2,length(geno.files),2))
main.process (common.gene, geno.files, surv.data)
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.