Replace read.table with read.csv

nf-core · Mar 11, 2020 · cf6c5c3 · cf6c5c3
1 parent e556636
commit cf6c5c3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/bin/plot_homer_annotatepeaks.r b/bin/plot_homer_annotatepeaks.r
@@ -57,7 +57,7 @@ plot.feature.dat <- data.frame()
 for (idx in 1:length(HomerFiles)) {
 
     sampleid = SampleIDs[idx]
-    anno.dat <- read.table(HomerFiles[idx], sep="\t", header=TRUE,quote="")
+    anno.dat <- read.csv(HomerFiles[idx], sep="\t", header=TRUE)
     anno.dat <- anno.dat[,c("Annotation","Distance.to.TSS","Nearest.PromoterID")]
 
     ## REPLACE UNASSIGNED FEATURE ENTRIES WITH SENSIBLE VALUES