diff --git a/DESCRIPTION b/DESCRIPTION index 977755b2..6e686b51 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -2,7 +2,7 @@ Package: mashr Type: Package Encoding: UTF-8 Title: Multivariate Adaptive Shrinkage -Version: 0.2.37 +Version: 0.2.38 Date: 2020-06-16 Authors@R: c(person("Matthew","Stephens",role="aut"), person("Sarah","Urbut",role="aut"), diff --git a/tests/testthat/test_cpp_computation.R b/tests/testthat/test_cpp_computation.R index f6c08286..a6f38661 100644 --- a/tests/testthat/test_cpp_computation.R +++ b/tests/testthat/test_cpp_computation.R @@ -94,7 +94,10 @@ test_that("compare posterior computation R vs C++ in provided data of 100 X 5", compute_posterior_matrices(data,Ulist,posterior_weights, algorithm.version = "Rcpp", mc.cores = 4)) - expect_equal(out1, out2, tolerance=1e-5) + expect_equal(out1$PosteriorMean,out2$PosteriorMean,tolerance = 1e-5) + expect_equal(out1$NegativeProb,out2$NegativeProb,tolerance = 1e-5) + expect_equal(out1$lfdr,out2$lfdr,tolerance = 1e-5) + expect_equal(out1$lfsr,out2$lfsr,tolerance = 1e-5) } )