changeset 4:72571a30f17b draft

Add test for unique peak names.
author kyost
date Wed, 02 May 2018 13:20:21 -0400
parents fbfe7b785ea7
children 3cd53127a838
files make_window_bed.R
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/make_window_bed.R	Wed May 02 13:20:01 2018 -0400
+++ b/make_window_bed.R	Wed May 02 13:20:21 2018 -0400
@@ -15,6 +15,8 @@
 
 qPCR_table <- read.delim(qPCR_bed, header=FALSE, stringsAsFactors=FALSE)
 
+qPCR_table[,4] <- make.unique(qPCR_table[,4], sep = "_")
+
 make_windows_bed <- function(a, size) { #a is a bed file containing peaks of interest and coordinates
   #generates bed file with overlapping windows spanning each peak of specified size
   return_bed <- data.frame()