Mercurial > repos > davidvanzessen > clonal_sequences_in_paired_samples

diff RScript.r @ 38:f5b242a5337f draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author davidvanzessen
date Fri, 11 Sep 2015 08:31:59 -0400
parents 623bbe972363
children 9fdcf6bfe024
line wrap: on
line diff
--- a/RScript.r	Fri Sep 11 08:26:18 2015 -0400
+++ b/RScript.r	Fri Sep 11 08:31:59 2015 -0400
@@ -317,7 +317,7 @@
       if(nrow(scatterplot_locus_data) != 0){
         if(on == "normalized_read_count"){
           scales = 10^(0:6) #(0:ceiling(log10(max(scatterplot_locus_data$normalized_read_count))))
-          p = ggplot(scatterplot_locus_data, aes(type, normalized_read_count)) + scale_y_log10(breaks=scales,labels=scales)
+          p = ggplot(scatterplot_locus_data, aes(type, normalized_read_count)) + scale_y_log10(breaks=scales,labels=scales) + expand_limits(y=10^6)
         } else {
           p = ggplot(scatterplot_locus_data, aes(type, Frequency)) + scale_y_continuous(limits = c(0, 100)) + expand_limits(y=c(0,100))
         }