add biweight r script and tests

1 files changed, 22 insertions, 0 deletions

diff --git a/gn3/computations/biweight.py b/gn3/computations/biweight.py
new file mode 100644
index 0000000..c17de8e
--- /dev/null
+++ b/gn3/computations/biweight.py
@@ -0,0 +1,22 @@
+
+
+"""module contains script to call biweight mid\
+correlation in R"""
+
+import subprocess
+from typing import List
+
+
+def call_biweight_script(trait_vals: List,
+                         target_vals: List,
+                         path_to_script: str = "./biweight_R",
+                         command: str = "Rscript"
+                         ):
+    '''biweight function'''
+    args_1 = ' '.join(str(trait_val) for trait_val in trait_vals)
+    args_2 = ' '.join(str(target_val) for target_val in target_vals)
+    cmd = [command, path_to_script] + [args_1] + [args_2]
+
+    results = subprocess.check_output(cmd, universal_newlines=True)
+
+    return tuple([float(y) for y in results.split()])