tests/testthat/test-duckduck-answer.R

test_that("it works", {
  skip_on_cran()
  result <- duckduck_answer("ggplot", app_name = "duckduckr_development")
  expect_true(is.list(result))
  expect_true(length(result) > 0)
  expect_equal("OK", attr(result, "status"))
})

Try the duckduckr package in your browser

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

duckduckr documentation built on May 2, 2019, 7:22 a.m.