diff --git a/tests/testthat/_snaps/linux-4.3/barplot/barplot-001.png b/tests/testthat/_snaps/linux-4.3/barplot/barplot-001.png new file mode 100644 index 00000000..c7c13dbe Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/barplot/barplot-001.png differ diff --git a/tests/testthat/_snaps/linux-4.3/boxplot/boxplot-001.png b/tests/testthat/_snaps/linux-4.3/boxplot/boxplot-001.png new file mode 100644 index 00000000..6930b164 Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/boxplot/boxplot-001.png differ diff --git a/tests/testthat/_snaps/linux-4.3/forest/forest_tte-001.png b/tests/testthat/_snaps/linux-4.3/forest/forest_tte-001.png new file mode 100644 index 00000000..be4d149c Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/forest/forest_tte-001.png differ diff --git a/tests/testthat/_snaps/linux-4.3/km/km-001.png b/tests/testthat/_snaps/linux-4.3/km/km-001.png new file mode 100644 index 00000000..883659bf Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/km/km-001.png differ diff --git a/tests/testthat/_snaps/linux-4.3/pca/pca-001.png b/tests/testthat/_snaps/linux-4.3/pca/pca-001.png new file mode 100644 index 00000000..fcb2373b Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/pca/pca-001.png differ diff --git a/tests/testthat/_snaps/linux-4.3/pca/pca-002.png b/tests/testthat/_snaps/linux-4.3/pca/pca-002.png new file mode 100644 index 00000000..1d0ad4a5 Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/pca/pca-002.png differ diff --git a/tests/testthat/_snaps/linux-4.3/pca/pca-003.png b/tests/testthat/_snaps/linux-4.3/pca/pca-003.png new file mode 100644 index 00000000..3fb78048 Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/pca/pca-003.png differ diff --git a/tests/testthat/_snaps/linux-4.3/pca/pca-004.png b/tests/testthat/_snaps/linux-4.3/pca/pca-004.png new file mode 100644 index 00000000..29e7bdb2 Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/pca/pca-004.png differ diff --git a/tests/testthat/_snaps/linux-4.3/pca/pca-005.png b/tests/testthat/_snaps/linux-4.3/pca/pca-005.png new file mode 100644 index 00000000..db4049d0 Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/pca/pca-005.png differ diff --git a/tests/testthat/_snaps/linux-4.3/pca/pca-006.png b/tests/testthat/_snaps/linux-4.3/pca/pca-006.png new file mode 100644 index 00000000..2e6a3b1d Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/pca/pca-006.png differ diff --git a/tests/testthat/_snaps/linux-4.3/pca/pca-007.png b/tests/testthat/_snaps/linux-4.3/pca/pca-007.png new file mode 100644 index 00000000..7b61b89c Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/pca/pca-007.png differ diff --git a/tests/testthat/_snaps/linux-4.3/pca/pca-008.png b/tests/testthat/_snaps/linux-4.3/pca/pca-008.png new file mode 100644 index 00000000..ba357a8d Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/pca/pca-008.png differ diff --git a/tests/testthat/_snaps/linux-4.3/pca/pca-009.png b/tests/testthat/_snaps/linux-4.3/pca/pca-009.png new file mode 100644 index 00000000..50388f8d Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/pca/pca-009.png differ diff --git a/tests/testthat/_snaps/linux-4.3/pca/pca-010.png b/tests/testthat/_snaps/linux-4.3/pca/pca-010.png new file mode 100644 index 00000000..9c4342b8 Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/pca/pca-010.png differ diff --git a/tests/testthat/_snaps/linux-4.3/quality/quality-001.png b/tests/testthat/_snaps/linux-4.3/quality/quality-001.png new file mode 100644 index 00000000..5b9a0070 Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/quality/quality-001.png differ diff --git a/tests/testthat/_snaps/linux-4.3/quality/quality-002.png b/tests/testthat/_snaps/linux-4.3/quality/quality-002.png new file mode 100644 index 00000000..1fea0387 Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/quality/quality-002.png differ diff --git a/tests/testthat/_snaps/linux-4.3/quality/quality-003.png b/tests/testthat/_snaps/linux-4.3/quality/quality-003.png new file mode 100644 index 00000000..7461334b Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/quality/quality-003.png differ diff --git a/tests/testthat/_snaps/linux-4.3/volcanoplot/volcanoplot-001.png b/tests/testthat/_snaps/linux-4.3/volcanoplot/volcanoplot-001.png new file mode 100644 index 00000000..e5576f40 Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/volcanoplot/volcanoplot-001.png differ diff --git a/tests/testthat/_snaps/linux-4.3/volcanoplot/volcanoplot-002.png b/tests/testthat/_snaps/linux-4.3/volcanoplot/volcanoplot-002.png new file mode 100644 index 00000000..bd40eecc Binary files /dev/null and b/tests/testthat/_snaps/linux-4.3/volcanoplot/volcanoplot-002.png differ diff --git a/tests/testthat/test-pca.R b/tests/testthat/test-pca.R index ef84a510..c1883bfb 100644 --- a/tests/testthat/test-pca.R +++ b/tests/testthat/test-pca.R @@ -108,7 +108,6 @@ test_that("pca module works as expected in the test app", { app$set_inputs(!!ns("y_var") := "4") app$set_inputs(!!ns("var_pct") := FALSE) app$set_inputs(!!ns("label") := FALSE) - app$set_inputs(!!ns("show_matrix") := FALSE) app$wait_for_idle() app$expect_select_screenshot(ns("plot_pca-plot_main")) @@ -149,9 +148,6 @@ test_that("pca module works as expected in the test app", { expect_identical(res$message, "please select two different principal components") # Update the inputs to PCA tab, hd1, counts, PC3, PC4, and add filters. - app$set_inputs(!!ns("tab_selected") := "PCA") - app$set_inputs(!!ns("experiment-name") := "hd1") - app$set_inputs(!!ns("assay-name") := "counts") app$set_inputs(!!ns("x_var") := "3") app$set_inputs(!!ns("y_var") := "4") app$set_inputs(!!ns("var_pct") := TRUE) @@ -172,7 +168,6 @@ test_that("pca module works as expected in the test app", { app$expect_select_screenshot(ns("plot_pca-plot_main")) # Update to cor tab. - app$set_inputs(!!ns("tab_selected") := "PCA") app$set_inputs(!!ns2("active-MAE-subjects-MAE_SEX-inputs-selection_open") := TRUE, allow_no_input_binding_ = TRUE) app$set_inputs(!!ns2("active-MAE-subjects-MAE_SEX-inputs-selection") := "F") app$set_inputs(!!ns2("active-MAE-subjects-MAE_SEX-inputs-selection_open") := FALSE, allow_no_input_binding_ = TRUE) @@ -213,7 +208,6 @@ test_that("pca module works as expected in the test app", { # Go back to first experiment and check that n_top stayed the same. app$set_inputs(!!ns("experiment-name") := "hd1") - app$set_inputs(!!ns("filter_top") := "TRUE") res <- app$wait_for_value(input = ns("n_top")) expect_identical(res, 2500L) app$stop()