t-test

Data file: B_625_625_5spc_repl1.rds

require(genefilter)
require(edgeR)
cdata <- readRDS("B_625_625_5spc_repl1.rds")
is.valid <- check_compData(cdata)
if (!(is.valid == TRUE)) stop("Not a valid compData object.")
nf <- edgeR::calcNormFactors(count.matrix(cdata), method = "TMM") * colSums(count.matrix(cdata))/exp(mean(log(colSums(count.matrix(cdata)))))
count.matrix <- round(sweep(count.matrix(cdata), 2, nf, "/"))
ttest.result <- genefilter::rowttests(count.matrix, factor(sample.annotations(cdata)$condition))
ttest.pvalues <- ttest.result$p.value
ttest.adjpvalues <- p.adjust(ttest.pvalues, method = "BH")
ttest.logFC <- ttest.result$dm
ttest.score <- 1 - ttest.pvalues
result.table <- data.frame(pvalue = ttest.pvalues, adjpvalue = ttest.adjpvalues, 
    logFC = ttest.logFC, score = ttest.score)
rownames(result.table) <- rownames(count.matrix(cdata))
result.table(cdata) <- result.table
package.version(cdata) <- paste("edgeR,", packageVersion("edgeR"), ";", "genefilter,", 
    packageVersion("genefilter"))
analysis.date(cdata) <- date()
method.names(cdata) <- list(short.name = "ttest", full.name = "ttest.1.44.0.TMM")
is.valid <- check_compData_results(cdata)
if (!(is.valid == TRUE)) stop("Not a valid compData result object.")
saveRDS(cdata, "/Users/charlotte/Documents/Projects/Rpackages/compcoder/compcodeR/vignettes/B_625_625_5spc_repl1_ttest.rds")
print(paste("Unique data set ID:", info.parameters(cdata)$uID))
[1] "Unique data set ID: B6Wo1X5LIQ"
sessionInfo()
R version 3.0.2 (2013-09-25)
Platform: x86_64-apple-darwin10.8.0 (64-bit)

locale:
[1] sv_SE.UTF-8/sv_SE.UTF-8/sv_SE.UTF-8/C/sv_SE.UTF-8/sv_SE.UTF-8

attached base packages:
 [1] splines   parallel  tcltk     stats     graphics  grDevices utils    
 [8] datasets  methods   base     

other attached packages:
 [1] compcodeR_0.99.1        genefilter_1.44.0      
 [3] TCC_1.2.0               ROC_1.38.0             
 [5] samr_2.0                matrixStats_0.8.14     
 [7] impute_1.36.0           NOISeq_2.4.0           
 [9] NBPSeq_0.1.8            qvalue_1.36.0          
[11] HTSDiff_1.0.1           HTSCluster_2.0.1       
[13] RColorBrewer_1.0-5      ggplot2_0.9.3.1        
[15] plotrix_3.5-3           edgeR_3.4.2            
[17] limma_3.18.11           EBSeq_1.2.0            
[19] gplots_2.12.1           blockmodeling_0.1.8    
[21] DSS_1.8.0               locfdr_1.1-7           
[23] DESeq2_1.2.10           RcppArmadillo_0.4.000.2
[25] Rcpp_0.11.0             DESeq_1.14.0           
[27] lattice_0.20-24         locfit_1.5-9.1         
[29] Biobase_2.22.0          baySeq_1.16.0          
[31] GenomicRanges_1.14.4    XVector_0.2.0          
[33] IRanges_1.20.6          BiocGenerics_0.8.0     
[35] rpanel_1.1-2            sm_2.2-5.4             
[37] roxygen2_3.1.0          devtools_1.5           

loaded via a namespace (and not attached):
 [1] annotate_1.40.0      AnnotationDbi_1.24.0 bitops_1.0-6        
 [4] brew_1.0-6           bsseq_0.10.0         caTools_1.16        
 [7] codetools_0.2-8      colorspace_1.2-4     DBI_0.2-7           
[10] dichromat_2.0-0      digest_0.6.4         evaluate_0.5.1      
[13] formatR_0.10         gdata_2.13.2         geneplotter_1.40.0  
[16] grid_3.0.2           gtable_0.1.2         gtools_3.2.1        
[19] httr_0.2             KernSmooth_2.23-10   knitr_1.5           
[22] labeling_0.2         markdown_0.6.4       MASS_7.3-29         
[25] memoise_0.1          modeest_2.1          munsell_0.4.2       
[28] plyr_1.8             proto_0.3-10         R.methodsS3_1.6.1   
[31] RCurl_1.95-4.1       reshape2_1.2.2       ROCR_1.0-5          
[34] RSQLite_0.11.4       scales_0.2.3         stats4_3.0.2        
[37] stringr_0.6.2        survival_2.37-7      tools_3.0.2         
[40] vioplot_0.2          whisker_0.3-2        XML_3.95-0.2        
[43] xtable_1.7-1