tests/testthat/test-util_set_singlequotes.R

test_that("util_set_sQuoteString works", {
  expect_equal(util_set_sQuoteString(
    paste0(LETTERS, letters, letters)
  ), paste0("'", paste0(LETTERS, letters, letters), "'"))
})

Try the dataquieR package in your browser

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

dataquieR documentation built on July 26, 2023, 6:10 p.m.