tests/testthat/test-explain.R

context("Checking explain")

test_that("explain produces a character vector",{

    m <- explain("(?<=foo)\\s+\\(\\d{4}\\)")
    expect_true(is.character(m))
    #expect_true(length(as.character(m)) > 8)
    
})

Try the qdapRegex package in your browser

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

qdapRegex documentation built on April 4, 2025, 4:35 a.m.