added "non-aadjusted" to the legend

DU-Bii · Mar 2, 2019 · c1ef566 · c1ef566
1 parent 8bb883d
commit c1ef566
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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)