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

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

test_that("spss.format.max returns proper output given proper input", {
  expect_equal(spss.format.max("score1", "score2"), "MAX(score1,score2)")
})

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.