# HG changeset patch # User yhoogstrate # Date 1426675201 14400 # Node ID 31335aa52b2e75fa2ab23e41d4e5691d2149f76d # Parent 86c3aaa205b54fc50dd7e6519a53875c3bd556b6 Uploaded diff -r 86c3aaa205b5 -r 31335aa52b2e edgeR_Convert_DGE_Table_to_Bedgraph.xml --- a/edgeR_Convert_DGE_Table_to_Bedgraph.xml Fri Mar 13 05:45:09 2015 -0400 +++ b/edgeR_Convert_DGE_Table_to_Bedgraph.xml Wed Mar 18 06:40:01 2015 -0400 @@ -46,23 +46,23 @@ - + "c3" in columns - + "c4" in columns - + "c5" in columns - + "c6" in columns - + "c7" in columns diff -r 86c3aaa205b5 -r 31335aa52b2e edgeR_Differential_Gene_Expression.xml --- a/edgeR_Differential_Gene_Expression.xml Fri Mar 13 05:45:09 2015 -0400 +++ b/edgeR_Differential_Gene_Expression.xml Wed Mar 18 06:40:01 2015 -0400 @@ -274,10 +274,13 @@ if(output_MDSplot_bcv != "/dev/null") { write("Creating MDS plot (bcv method)",stdout()) - pdf("/home/youri/Desktop/bcvmds.pdf") - points <- plotMDS.DGEList(dge,method="bcv",top=500,labels=rep("",nrow(dge\$samples)))# Get coordinates of unflexible plot + + ## 1. First create a virtual plot to obtain the desired coordinates + pdf("bcvmds.pdf") + points <- plotMDS.DGEList(dge,method="bcv",top=500,labels=rep("",nrow(dge\$samples))) dev.off()# Kill it + ## 2. Re-plot the coordinates in a new figure with the size and settings. if(output_format_images == "pdf") { pdf(output_MDSplot_bcv,height=14,width=14) } else if(output_format_images == "svg") {