From b566a8950864a373f95ae2914b862e9846297b2d Mon Sep 17 00:00:00 2001
From: Alexander Kabui
Date: Wed, 16 Jun 2021 14:07:24 +0300
Subject: add r-wgna package

---
 gn3/computations/test_biweight.R | 8 ++++----
 guix.scm                         | 2 +-
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/gn3/computations/test_biweight.R b/gn3/computations/test_biweight.R
index 2269120..599e733 100644
--- a/gn3/computations/test_biweight.R
+++ b/gn3/computations/test_biweight.R
@@ -8,16 +8,16 @@ test_that("sum of vector", {
 
 
 test_that("biweight results"),{
-	vec_1 = c(1,2,3,4)
-	vec_2 = c(1,2,3,4)
+	vec_1 <- c(1,2,3,4)
+	vec_2 <- c(1,2,3,4)
 
-	results = BiweightMidCorrelation(vec_1,vec_2)
+	results <- BiweightMidCorrelation(vec_1,vec_2)
 	expect_equal(c(1.0,0.0),results)
 }
 
 
 test_that("parsing args "),{
-	my_args = c("1 2 3 4","5 6 7 8")
+	my_args <- c("1 2 3 4","5 6 7 8")
 	results <- ParseArgs(my_args)
 
 	expect_equal(results[1],c(1,2,3,4))
diff --git a/guix.scm b/guix.scm
index bf700d0..d41600d 100644
--- a/guix.scm
+++ b/guix.scm
@@ -89,7 +89,7 @@
                        ("r-qtl" ,r-qtl)
                        ("r-testthat" ,r-testthat)
                        ("r-optparse" ,r-optparse)
-                       ; ("r-wgcna" ,r-wgcna)
+                       ("r-wgcna" ,r-wgcna)
                        ))
   (build-system python-build-system)
   (home-page "https://github.com/genenetwork/genenetwork3")
-- 
cgit v1.2.3