diff --git a/Homo_sapiens/TCGA_study-case/R/pvalue_histogram.R b/Homo_sapiens/TCGA_study-case/R/pvalue_histogram.R index 8bea52b..7d5fae3 100644 --- a/Homo_sapiens/TCGA_study-case/R/pvalue_histogram.R +++ b/Homo_sapiens/TCGA_study-case/R/pvalue_histogram.R @@ -45,7 +45,7 @@ PvalueHistogram <- function(Pvalues, legend.text <- append( legend.text, c(paste("alpha = ", signif(digits = 2, pval.stat$alpha)), - paste("positives = ", pval.stat$positives))) + paste("positives (non-adjusted!) = ", pval.stat$positives))) } legend("topright", legend = legend.text)