From 869af0fda1970bd2c479dc6151fa78f92be15f14 Mon Sep 17 00:00:00 2001 From: RLumSK Date: Sat, 8 Feb 2025 17:51:15 +0100 Subject: [PATCH] Complete tests for plot_MoranScatterplot() --- tests/testthat/test_plot_MoranScatterplot.R | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/tests/testthat/test_plot_MoranScatterplot.R b/tests/testthat/test_plot_MoranScatterplot.R index a7751e330..c6f4f4f2d 100644 --- a/tests/testthat/test_plot_MoranScatterplot.R +++ b/tests/testthat/test_plot_MoranScatterplot.R @@ -35,6 +35,12 @@ test_that("check functionality", { expect_warning(plot_MoranScatterplot(1:100 - 2, log = "xy", legend = FALSE), "x-axis values rescaled because of log transform") + expect_warning(plot_MoranScatterplot((1:100) - 20, log = "y", + legend = FALSE), + "y-axis values rescaled because of log transform \\(also in return df\\)") + + expect_silent(plot_MoranScatterplot((1:100) - 2, log = "y", + legend = FALSE)) obj.na <- obj obj.na@data$vn_values[c(24, 73)] <- NA