From f1a0690387a34f9775567a3b8cf1d005f2d9faca Mon Sep 17 00:00:00 2001 From: JannikHamp Date: Fri, 11 Jan 2019 11:04:39 +0100 Subject: [PATCH] Delete abs_max_score.R --- bin/1.2_filter_motifs/abs_max_score.R | 24 ------------------------ 1 file changed, 24 deletions(-) delete mode 100644 bin/1.2_filter_motifs/abs_max_score.R diff --git a/bin/1.2_filter_motifs/abs_max_score.R b/bin/1.2_filter_motifs/abs_max_score.R deleted file mode 100644 index b6e5de0..0000000 --- a/bin/1.2_filter_motifs/abs_max_score.R +++ /dev/null @@ -1,24 +0,0 @@ -#!/bin/Rscript - -# author: Jannik Hamp -# email: jannik.hamp@googlemail.com - -# desciption: This script gets called by compareBed.sh - -# It calculates the absolute position of maximum score of the footprints. -# This information is later used for an additional flag column in the bed file. - -library(data.table) -args = commandArgs(TRUE) -file = args[1] - -tab = fread(file, sep='\t') - -# check if data has less than 9 columns -if (ncol(tab) < 9) { - stop("footprint file has less than 9 columns. exiting.") -} - -tab[[8]] = tab[[2]] + tab[[8]] - -fwrite(tab, file, row.names=FALSE, col.names=FALSE, quote=FALSE, sep='\t')