Add a single quote to qsvPCs to get the same error message as in the …

…function
LieberInstitute · Jan 16, 2024 · 856e004 · 856e004
1 parent d066823
commit 856e004
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/testthat/test-get_qsvs.R b/tests/testthat/test-get_qsvs.R
@@ -28,5 +28,5 @@ test_that("k is higher than the number of columns throws an error", {
 })
 
 test_that("input has to be a prcomp", {
-  expect_error(get_qsvs(covComb_tx_deg, 3), "qsvPCs must be a prcomp object.")
+  expect_error(get_qsvs(covComb_tx_deg, 3), "'qsvPCs' must be a prcomp object.")
 })