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 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'gn3/computations/test_biweight.R') 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)) -- cgit v1.2.3