tests/testthat/test-manynet-glossary.R

test_that("glossary works", {
  expect_match(gloss("star"),"A star network")
  expect_match(gloss("bloop","star"),"A star network")
  expect_match(gloss("bloop","star"),"bloop")
  expect_match(print_glossary(),"A star network")
  expect_no_match(print_glossary(),"bloop")
})

Try the manynet package in your browser

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

manynet documentation built on Nov. 5, 2025, 6:26 p.m.