tests/testthat/test_generateEnc.R

context("generateEnc")

a <- generateEnc(list(list(text = 'Français', ascii = 'Francais')))

test_that("generateEnc", {
  expect_true(is.list(a))
  expect_length(a, 1)
  expect_equal(a[[1]], "\\enc{Français}{Francais}")
})

Try the wyz.code.rdoc package in your browser

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

wyz.code.rdoc documentation built on Oct. 6, 2021, 9:07 a.m.