tests/testthat/test-receptiviti_frameworks.R

skip_if(Sys.getenv("RECEPTIVITI_KEY") == "", "no API key")

test_that("listing works", {
  expect_error(receptiviti_frameworks(url = ""))
  framworks <- receptiviti_frameworks()
  expect_true("liwc15" %in% framworks)
})

Try the receptiviti package in your browser

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

receptiviti documentation built on Jan. 30, 2026, 1:07 a.m.