diff --git a/tests/testthat/test-convert-log-scale.R b/tests/testthat/test-convert-log-scale.R index 1058bd4..2d0d306 100644 --- a/tests/testthat/test-convert-log-scale.R +++ b/tests/testthat/test-convert-log-scale.R @@ -2,7 +2,6 @@ test_that("Can convert to and from log scale in R", { inputs <- data.table::fread(test_path("testdata", "testdata.csv")) log_inputs <- convert_log2_scale(inputs, "me", lower_limit = 2) unlog_inputs <- convert_log2_scale_inverse(log_inputs, "me", lower_limit = 2) - expect_equal(inputs, unlog_inputs) })