From af6eda556f4e98336ad33ca69a19fe8ce614caf1 Mon Sep 17 00:00:00 2001
From: Laurent Modolo <laurent@modolo.fr>
Date: Mon, 8 Oct 2018 16:55:43 +0200
Subject: [PATCH] intersect_SNP.R: remove print
---
src/intersect_SNP.R | 1 -
1 file changed, 1 deletion(-)
diff --git a/src/intersect_SNP.R b/src/intersect_SNP.R
index b2f7df2..298b878 100755
--- a/src/intersect_SNP.R
+++ b/src/intersect_SNP.R
@@ -24,7 +24,6 @@ snp$seq_list <- snp %>%
begin <- as.integer(x[ POS ]) - 10
end <- as.integer(x[ POS ]) + 10
chrom <- x[ CHROM ]
- print(paste0(chrom, ":", begin, "-", end))
seq_restric <- fastafile[[ chrom ]] %>%
c2s() %>%
substr(begin, end) %>%
--
GitLab