/usr/share/doc/r-cran-tibble/tests/testthat/test-string-to-indices.R is in r-cran-tibble 1.4.1-1ubuntu1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 | context("string to indices")
test_that("works as expected", {
expect_identical(string_to_indices(as.character(1:3)), 1:3)
expect_identical(string_to_indices(letters[1:3]), rep(NA_integer_, 3))
expect_identical(string_to_indices(as.character(1:3 + 1e10)), 1:3 + 1e10)
expect_identical(string_to_indices(c(as.character(1:3 + 1e10), "x")), c(1:3 + 1e10, NA))
expect_identical(string_to_indices(as.character(c(1:3, 1:3 + 1e10))), c(1:3, 1:3 + 1e10))
})
|