library(testthat)
library(agcounts)
library(reticulate)
library(shinytest2)

skip_if_no_pygt3x <- function(){
  have_python <- py_available()

  if(!have_python){
    skip("Python not available for testing")
  }

  have_pygt3x <- py_module_available("pygt3x")
  if(!have_pygt3x){
    skip("pygt3x not available for testing")
  }
}

test_check("agcounts")