tests/testthat/test-utils-display.R

test_that("paste_line", {
  example1 <- c("Kansas", "Missouri", "South Carolina", "Utah")

  expect_equal(paste_line(example1), "Kansas\nMissouri\nSouth Carolina\nUtah")
  expect_equal(paste_line(example1, .trailing = TRUE),
               "Kansas\nMissouri\nSouth Carolina\nUtah\n")
})

Try the measr package in your browser

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

measr documentation built on May 29, 2024, 2:50 a.m.