tests/testthat/test-content.R

test_that("content", {
  expect_equal(
    content_csv(),
    "text/csv"
  )

  expect_equal(
    content_tsv(),
    "tab-separated-values"
  )

  expect_equal(
    content_html(),
    "text/html"
  )

  expect_equal(
    content_plain(),
    "text/plain"
  )

  expect_equal(
    content_json(),
    "application/json"
  )

  expect_equal(
    content_protobuf(),
    "application/x-protobuf"
  )
})

Try the ambiorix package in your browser

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

ambiorix documentation built on April 3, 2025, 9:34 p.m.