diff options
Diffstat (limited to 'gn3/computations/biweight.R')
| -rw-r--r-- | gn3/computations/biweight.R | 2 |
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)) |