tests/testthat/test-translate_extrema.R

context("Translate extrema")


test_that("translate_MIN() returns the expected translation", {
  expect_equal(translate_MIN("Min(0,1)"), "min(0,1)")
})

test_that("translate_MAX() returns the expected translation", {
  expect_equal(translate_MAX("mAx(0,1)"), "max(0,1)")
})

Try the readsdr package in your browser

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

readsdr documentation built on Jan. 13, 2021, 11:08 a.m.