tests/testthat/test-c.extracted.R

context("Checking c.extracted")

test_that("c.extracted unlists",{

    x <- structure(list(NA_character_, "45.6%", "14%"), class = c("extracted", 
        "list"))

    expect_equivalent(c(x), c(NA, "45.6%", "14%"))    

})
trinker/qdapRegex documentation built on Oct. 19, 2023, 11:31 p.m.