# HG changeset patch # User davidvanzessen # Date 1472123727 14400 # Node ID 7c9b9d97d596ce1581fc2b0464b520e673ffbbb3 # Parent 93c7d58a292cd173bd20c1d682e2dd2def2f4e46 Uploaded diff -r 93c7d58a292c -r 7c9b9d97d596 report_clonality/RScript.r --- a/report_clonality/RScript.r Wed Aug 17 09:00:38 2016 -0400 +++ b/report_clonality/RScript.r Thu Aug 25 07:15:27 2016 -0400 @@ -135,8 +135,8 @@ #write the complete dataset that is left over, will be the input if 'none' for clonaltype and 'no' for filterproductive -write.table(PRODF, "allUnique.txt", sep=",",quote=F,row.names=F,col.names=T) -write.table(PRODF, "allUnique.csv", sep="\t",quote=F,row.names=F,col.names=T) +write.table(PRODF, "allUnique.txt", sep="\t",quote=F,row.names=F,col.names=T) +write.table(PRODF, "allUnique.csv", sep=",",quote=F,row.names=F,col.names=T) write.table(UNPROD, "allUnproductive.csv", sep=",",quote=F,row.names=F,col.names=T) #write the samples to a file