diff --git a/DESCRIPTION b/DESCRIPTION index 5cb0701..134477e 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -2,7 +2,7 @@ Package: projectR Type: Package Title: Functions for the projection of weights from PCA, CoGAPS, NMF, correlation, and clustering -Version: 1.19.3 +Version: 1.23.1 Author: Gaurav Sharma, Charles Shin, Jared Slosberg, Loyal Goff, Genevieve Stein-O'Brien Authors@R: c( person("Gaurav", "Sharma", role = c("aut")), diff --git a/tests/testthat/test_projectR.R b/tests/testthat/test_projectR.R index 0f5ddb1..46ddfcf 100644 --- a/tests/testthat/test_projectR.R +++ b/tests/testthat/test_projectR.R @@ -210,8 +210,7 @@ test_that("projection works on sparse data matrix", { pdense <- projectR(dense, loadings) psparse <- projectR(sparse, loadings) - expect_identical(projectR(dense, loadings), - projectR(sparse, loadings)) + expect_identical(pdense, psparse) }) test_that("projection works on sparse data matrix with full=TRUE", { @@ -224,6 +223,5 @@ test_that("projection works on sparse data matrix with full=TRUE", { pdense <- projectR(dense, loadings, full=TRUE) psparse <- projectR(sparse, loadings, full=TRUE) - expect_identical(projectR(dense, loadings), - projectR(sparse, loadings)) + expect_identical(pdense, psparse) }) \ No newline at end of file