require(httptest, quietly = TRUE) # helper function to skip tests if we don't have the fastf1 module skip_if_no_ff1 <- function() { have_ff1 <- "fastf1" %in% reticulate::py_list_packages()$package if (!have_ff1) { testthat::skip("fastf1 not available for testing") } } # helper function to skip tests if we don't have ggplot2 skip_if_no_ggplot2 <- function() { if (!require("ggplot2", quietly = TRUE)) { testthat::skip("ggplot2 not available for testing") } } skip_if_no_py <- function() { if (!reticulate::py_available(initialize = TRUE)) { testthat::skip("Python not available for testing") } }