denoise

VascoElbrecht · Aug 3, 2017 · ba3a042 · ba3a042
1 parent 3487038
commit ba3a042
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 230 deletions.
diff --git a/JAMP/R/Denoise.R b/JAMP/R/Denoise.R
@@ -1,6 +1,6 @@
 # Haplotyping v0.1
 
-Denoise <- function(files="latest",  strategy="unoise", unoise_alpha=5, minsize=10, minhaplosize=0.003){
+Denoise <- function(files="latest",  strategy="unoise", unoise_alpha=5, minsize=10, minrelsize=0.0001, minhaplosize=0.003){
 
 
 
@@ -233,8 +233,6 @@ data[nrow(data), i+3] <- data[nrow(data), i+3] + sum(data[i+3][temp < minhaplosi
 data[i+3][temp < minhaplosize] <- 0
 }
 
-tail(data)
-
 
 # remove all rows with 0!
 data <- data[rowSums(data[5:ncol(data)-1])!=0,]

diff --git a/log.txt b/log.txt