tests/testthat/test-clean.R

context("Checking clean")

test_that("clean gives the desired output",{

    x <- "I go \r\n    to the \tnext line"
    expect_true(clean(x) == "I go to the next line")

})

Try the qdap package in your browser

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

qdap documentation built on Nov. 20, 2017, 5:09 p.m.