tests/testthat/test-read_rpadj_xlsx.R

library(testthat)

test_that("read_rpadj_xlsx works", {
    x <- read_rpadj_xlsx()
    expect_equal(dim(x), c(25, 3))
})

Try the FastRet package in your browser

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

FastRet documentation built on June 25, 2024, 5:07 p.m.