tests/testthat/test-give_col_numbers.R

test_that("giving columns names of their position works", {
  expect_equal(names(give_col_numbers(iris[1:3])),
        c("COL.1", "COL.2", "COL.3")       )


})
mdsumner/zooperdanke documentation built on Nov. 4, 2019, 6:23 p.m.