conditional test

Author: teunbrand

tests/testthat/test-guide-legend.R

@@ -137,6 +137,8 @@ test_that("legends can be forced to display unrelated geoms", {
 })
 
 test_that("unresolved, modified expressions throw a warning (#6264)", {
+  # Snapshot is unstable in lesser R versions
+  skip_if_not(getRversion() >= "4.3.0")
   p <- ggplot(mpg, aes(drv)) +
     geom_bar(
       aes(fill = stage(drv, after_scale = alpha(fill, prop)))