Remove tests for plots based on snapshots for beeing too fragile

Author: NRaillard

tests/testthat/Rplots.pdf

@@ -6,27 +6,35 @@ test_that("we can plot the 2D spectrum", {
   expect_no_warning(print(plot_from_index))
   expect_no_warning(print(plot_not_normalized))
   expect_no_warning(print(plot_from_date))
-  vdiffr::expect_doppelganger(
-    "Specifying index",
-    plot_from_index,
-    variant = Sys.info()[["sysname"]]
-  )
-  vdiffr::expect_doppelganger(
-    "Un-normalized 2D spectra",
-    plot_not_normalized,
-    variant = Sys.info()[["sysname"]]
-  )
-  vdiffr::expect_doppelganger(
-    "Plot by date",
-    plot_from_date,
-    variant = Sys.info()[["sysname"]]
-  )
+  # vdiffr::expect_doppelganger(
+  #   "Specifying index",
+  #   plot_from_index,
+  #   variant = Sys.info()[["sysname"]]
+  # )
+  # vdiffr::expect_doppelganger(
+  #   "Un-normalized 2D spectra",
+  #   plot_not_normalized,
+  #   variant = Sys.info()[["sysname"]]
+  # )
+  # vdiffr::expect_doppelganger(
+  #   "Plot by date",
+  #   plot_from_date,
+  #   variant = Sys.info()[["sysname"]]
+  # )
 })
 
 test_that("Plotting maps works", {
-  vdiffr::expect_doppelganger(
-    "Mapping water depth",
-    rscd_mapplot(resourcecodedata::rscd_field$depth, name = "Depth (m)"),
-    variant = Sys.info()[["sysname"]]
-  )
+  expect_no_error(rscd_mapplot(
+    resourcecodedata::rscd_field$depth,
+    name = "Depth (m)"
+  ))
+  expect_no_warning(rscd_mapplot(
+    resourcecodedata::rscd_field$depth,
+    name = "Depth (m)"
+  ))
+  # vdiffr::expect_doppelganger(
+  #   "Mapping water depth",
+  #   rscd_mapplot(resourcecodedata::rscd_field$depth, name = "Depth (m)"),
+  #   variant = Sys.info()[["sysname"]]
+  # )
 })