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%"))    

})

Try the qdapRegex package in your browser

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

qdapRegex documentation built on Oct. 17, 2023, 5:06 p.m.