## Calculating transcriptome overlap measure within D. melanogaster
## without user-provided gene lists
## dm_gene_expr.rda can be downloaded and unzipped from
## http://www.stat.ucla.edu/~jingyi.li/packages/TROM/TROM_Rdata.zip.
load("dm_gene_expr.rda")
dm_trom <- ws.trom(sp_gene_expr = dm_gene_expr, z_thre = 1.5,
FPKM_thre = 1, provide = FALSE, save_overlap_genes = TRUE)
## with user-provided gene lists
gene_lists <- system.file("dm_associated_genes.xlsx", package = "TROM")
dm_trom_2 <- ws.trom(provide = TRUE, gene_lists = gene_lists)Run the code above in your browser using DataLab