tests/testthat/test-conv.R

test_that("encoding conversion works", {
  skip_on_os("windows")

  x <- rawToChar(as.raw(177))
  expect_equal(str_conv(x, "latin1"), "±")
})

test_that("check encoding argument", {
  expect_error(str_conv("A", c("ISO-8859-1", "ISO-8859-2")), "single string")
})
tidyverse/stringr documentation built on Nov. 20, 2023, 5:16 p.m.