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

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

test_that("spss.format.compute returns proper output given proper input", {
  expect_equal(spss.format.compute("new_var", spss.format.max("var1", "var2")), "COMPUTE new_var = MAX(var1,var2).")
})

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.