tests/testthat/test-scRUVg.R
In SydneyBioX/scMerge: scMerge: Merging multiple batches of scRNA-seq data
context("Test scRUVg")
set.seed(1234)
L = scMerge::ruvSimulate(m = 80, n = 1000, nc = 50, nCelltypes = 10)
Y = L$Y; ctl = L$ctl; X = L$X
ruvgRes = scMerge::scRUVg(Y = Y, ctl = ctl, k = 20)
old = ruv::RUV2(Y = Y, X = X, ctl = ctl, k = 20)
expect_equal(abs(ruvgRes$W), abs(old$W))
SydneyBioX/scMerge documentation built on April 14, 2024, 3:22 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
context("Test scRUVg")
set.seed(1234)
L = scMerge::ruvSimulate(m = 80, n = 1000, nc = 50, nCelltypes = 10)
Y = L$Y; ctl = L$ctl; X = L$X
ruvgRes = scMerge::scRUVg(Y = Y, ctl = ctl, k = 20)
old = ruv::RUV2(Y = Y, X = X, ctl = ctl, k = 20)
expect_equal(abs(ruvgRes$W), abs(old$W))
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.