tests/testthat/test-has.key.r

In decisionpatterns/r-hash: A Hash/Dictionary/Map/Associated Array for R

library(hash)
library(testthat)

context('has.key')

test_that("has.key", {
  #' Ensure that there are no keys on emptyhash
  h <- hash()
  'c' %>% has.key(h) %>% expect_false()
  
})