tests/testthat/test_createStamp.R

context("createStamp")

test_that("basic",{

    fileRef <- "testReference/createStamp01.rds"
    res <- createStamp(script="ex.R",file="out.R",time="a test")

    expect_equal_to_reference(res,fileRef)

})

Try the tracee package in your browser

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

tracee documentation built on June 24, 2024, 9:07 a.m.