# HG changeset patch # User yhoogstrate # Date 1400769371 14400 # Node ID 0bbf792139708f44147766b9af2ffa714e0d0707 # Parent d9c9caf4e182290ca6b8a9a068ce67060470183b Uploaded diff -r d9c9caf4e182 -r 0bbf79213970 edgeR_Differential_Gene_Expression.xml --- a/edgeR_Differential_Gene_Expression.xml Thu May 22 10:27:38 2014 -0400 +++ b/edgeR_Differential_Gene_Expression.xml Thu May 22 10:36:11 2014 -0400 @@ -280,7 +280,7 @@ } if(output_heatmap_plot != "/dev/null") { - pdf(output_heatmap_plot) + pdf(output_heatmap_plot,width=8.5) etable2 <- topTags(lrt, n=100)\$table order <- rownames(etable2) cpm_sub <- cpm(dge,normalized.lib.sizes=TRUE,log=TRUE)[as.numeric(order),]