tests/testthat/test-spss-rtrim.R

context("Output of spss.rtrim")

test_that("spss.rtrim returns proper output given proper input", {
  expect_equal(spss.rtrim("some_var"), "RTRIM(some_var)")
})

Try the syntaxr package in your browser

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

syntaxr documentation built on May 2, 2019, 3:45 a.m.