[Patchwork-commits] r85 - pkg/patchwork/R

[noreply at r-forge.r-project.org]

Author: mayrhofer
Date: 2012-02-09 16:05:56 +0100 (Thu, 09 Feb 2012)
New Revision: 85

Modified:
   pkg/patchwork/R/patchwork.alleledata.r
Log:


Modified: pkg/patchwork/R/patchwork.alleledata.r
===================================================================
--- pkg/patchwork/R/patchwork.alleledata.r	2012-02-08 14:08:31 UTC (rev 84)
+++ pkg/patchwork/R/patchwork.alleledata.r	2012-02-09 15:05:56 UTC (rev 85)
@@ -21,7 +21,7 @@
 	system(paste("cat ",Pileup," | perl .perl/pile2alleles.pl > ",getwd(),"/pile.alleles",sep=""))
 	system("rm -r .perl")
 	alf = read.csv('pile.alleles', sep='\t',header=F)[,1:6]
-	system("rm pile.alleles")
+	#system("rm pile.alleles")
 	
 	colnames(alf) = c('achr','apos','atype','aqual','atot','amut')
 	alf$aref = alf$atot - alf$amut