tests/testthat/test_emrcontainers.R

In paws.compute: 'Amazon Web Services' Compute Services

svc <- paws::emrcontainers()

test_that("list_job_templates", {
  expect_error(svc$list_job_templates(), NA)
})

test_that("list_security_configurations", {
  expect_error(svc$list_security_configurations(), NA)
})

test_that("list_virtual_clusters", {
  expect_error(svc$list_virtual_clusters(), NA)
})