tests/testthat/test-format_capitalize.R

test_that("format_capitalize", {
  expect_equal(format_capitalize("hello"), "Hello")
  expect_equal(format_capitalize(c("hello", "world")), c("Hello", "World"))
  expect_equal(
    unique(format_capitalize(iris$Species)),
    c("Setosa", "Versicolor", "Virginica")
  )
})
easystats/insight documentation built on Oct. 2, 2024, 8:19 a.m.