tests/testthat/test-spss-compute-max.R

context("Output of spss.compute.max")

test_that("spss.compute.max returns proper output given proper input", {
  expect_equal(spss.compute.max("dob", "dob_f", append = "new."), "COMPUTE new.dob = MAX(dob,dob_f).")
})

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.