aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gn3/computations/biweight.R2
1 files changed, 1 insertions, 1 deletions
diff --git a/gn3/computations/biweight.R b/gn3/computations/biweight.R
index d0d8de4..05f7145 100644
--- a/gn3/computations/biweight.R
+++ b/gn3/computations/biweight.R
@@ -7,7 +7,7 @@ trait_vals <- as.numeric(unlist(strsplit(myArgs[1], split=" ")))
target_vals <- as.numeric(unlist(strsplit(myArgs[2], split=" ")))
BiweightMidCorrelation <- function(trait_val,target_val){
- # results <- bicorAndPvalue(x,y)
+ results <- bicorAndPvalue(x,y)
return (list(c(results$bicor)[1],c(results$p)[1]))
}
cat(BiweightMidCorrelation(trait_vals,target_vals))