diff --git a/tests/testthat/test-getDegTx.R b/tests/testthat/test-getDegTx.R index b513d0e..1a782f1 100644 --- a/tests/testthat/test-getDegTx.R +++ b/tests/testthat/test-getDegTx.R @@ -64,7 +64,7 @@ test_that("getDegTx works with original and altered row names", { altered_covComb_tx_deg <- covComb_tx_deg rownames(altered_covComb_tx_deg) <- gsub("\\..*", "", rownames(covComb_tx_deg)) altered_results <- getDegTx(altered_covComb_tx_deg,sig_transcripts =select_transcripts("cell_component")) - + rownames(altered_results) <- rownames(original_results) # Test if two objects equal expect_equal(original_results, altered_results) }) \ No newline at end of file