Mercurial > repos > davidvanzessen > phenotype_gene_relations

changeset 11:e907c881779b draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author davidvanzessen
date Fri, 04 Sep 2015 06:09:56 -0400
parents 768df9ba57e8
children 05207b86be1b
files phenotype_gene_relations_plot.r
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/phenotype_gene_relations_plot.r	Fri Sep 04 04:52:05 2015 -0400
+++ b/phenotype_gene_relations_plot.r	Fri Sep 04 06:09:56 2015 -0400
@@ -49,7 +49,7 @@
 p = p + theme(axis.text.x = element_text(angle = 45, hjust = 1))
 
 
-png("plot1.png", width=length(unique(dat.sub2$diseaseId)) * 30 + 300)
+png("plot1.png", width=length(unique(dat.sub2$disease.gene)) * 30 + 300)
 print(p)
 dev.off()
 
@@ -59,7 +59,7 @@
 
 p = p + theme(axis.text.x = element_text(angle = 45, hjust = 1))
 
-png("plot2.png", width=length(unique(dat.sub3$diseaseId)) * 30 + 300)
+png("plot2.png", width=length(unique(dat.sub3$diseaseId)) * 20 + 300)
 print(p)
 dev.off()
 
@@ -69,7 +69,7 @@
 
 p = p + theme(axis.text.x = element_text(angle = 45, hjust = 1))
 
-png("plot3.png", width=length(unique(dat.sub3$diseaseId)) * 30 + 300)
+png("plot3.png", width=length(unique(dat.sub3$diseaseId)) * 20 + 300)
 print(p)
 dev.off()