From 40147a67c078592ea8189c344b639b837051b900 Mon Sep 17 00:00:00 2001
From: pjlaw <phililaw.spam@gmail.com>
Date: Wed, 2 Nov 2022 18:17:32 +0000
Subject: [PATCH] Make threshold parameter numeric

Causing incorrect filtering of the results table due to character-numeric comparison
---
 src/make_master_tables.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/make_master_tables.R b/src/make_master_tables.R
index ce6d20b..c109e57 100644
--- a/src/make_master_tables.R
+++ b/src/make_master_tables.R
@@ -10,7 +10,7 @@ args <- commandArgs(trailingOnly = TRUE)
 
 #exp=args[1]
 cond=args[1]
-thresh=args[2]
+thresh=as.numeric(args[2])
 outfile=args[3]
 avg_outfile=args[4]
 #out=args[3]