tests/testthat/test_as_latex_table.R

test_that("Check github_commits()", {
  testthat::skip_on_cran()
  local_edition(3)

  df <- data.frame(x = "test", y = 1:10)
  expect_output(Luminescence:::.as.latex.table.data.frame(df))

})

Try the Luminescence package in your browser

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

Luminescence documentation built on Nov. 3, 2023, 5:09 p.m.