tests/testthat/test_NMreadCov.R

context("NMreadCov")

test_that("basic",{

    fileRef <- "testReference/NMreadCov_01.rds"
    file.cov <- "testData/nonmem/estim_debug.cov"

    res <- NMreadCov(file=file.cov)
    expect_equal_to_reference(res,fileRef)
})

Try the NMdata package in your browser

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

NMdata documentation built on Nov. 11, 2023, 5:07 p.m.