fixed missing point

loosolab · Jan 12, 2019 · 5acffac · 5acffac
1 parent 7c41856
commit 5acffac
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/bin/2.1_clustering/cdhit_wrapper.R b/bin/2.1_clustering/cdhit_wrapper.R
@@ -202,7 +202,7 @@ cdhitest <- function(input, identity = 0.8, coverage = 8, output = "cluster.bed"
 
   # cast start and end column to integer64 to prevent scientific notation e.g. 1e+10
   # start and end are assumed to be at position 2 and 3
-  result[, c(2, 3) := lapply(.SD, bit64::as.integer64), SDcols = c(2, 3)]
+  result[, c(2, 3) := lapply(.SD, bit64::as.integer64), .SDcols = c(2, 3)]
 
   data.table::fwrite(x = result, file = output, sep = "\t", col.names = keep_col_names)
 }

diff --git a/bin/2.1_clustering/reduce_sequence.R b/bin/2.1_clustering/reduce_sequence.R
@@ -233,7 +233,7 @@ reduce_sequence <- function(input, kmer = 10, motif = 10, output = "reduced.bed"
 
   # cast start and end column to integer64 to prevent scientific notation e.g. 1e+10
   # start and end are assumed to be at position 2 and 3
-  merged[, c(2, 3) := lapply(.SD, bit64::as.integer64), SDcols = c(2, 3)]
+  merged[, c(2, 3) := lapply(.SD, bit64::as.integer64), .SDcols = c(2, 3)]
 
   data.table::fwrite(merged, file = output, sep = "\t", col.names = keep_col_names)
 }