tests/testthat/test_elasticsearchservice.R

svc <- paws::elasticsearchservice()

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

test_that("describe_inbound_cross_cluster_search_connections", {
  expect_error(svc$describe_inbound_cross_cluster_search_connections(MaxResults = 20), NA)
})

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

test_that("describe_outbound_cross_cluster_search_connections", {
  expect_error(svc$describe_outbound_cross_cluster_search_connections(MaxResults = 20), NA)
})

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

test_that("describe_packages", {
  expect_error(svc$describe_packages(MaxResults = 20), NA)
})

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

test_that("describe_reserved_elasticsearch_instance_offerings", {
  expect_error(svc$describe_reserved_elasticsearch_instance_offerings(MaxResults = 20), NA)
})

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

test_that("describe_reserved_elasticsearch_instances", {
  expect_error(svc$describe_reserved_elasticsearch_instances(MaxResults = 20), NA)
})

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

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

test_that("list_elasticsearch_versions", {
  expect_error(svc$list_elasticsearch_versions(MaxResults = 20), NA)
})

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

Try the paws.analytics package in your browser

Any scripts or data that you put into this service are public.

paws.analytics documentation built on Sept. 11, 2023, 5:06 p.m.