tests/testthat/test_pricing.R

svc <- paws::pricing()

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

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

Try the paws.cost.management package in your browser

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

paws.cost.management documentation built on Sept. 12, 2023, 1:09 a.m.