tests/testthat/test_mds_rpt_xls.R

context("Package Functions - mds_rpt_xls.R")

test_that("mds_rpt_xls executes", {
  #load data
  df <- mdsR::mds_dta

  ## test function
  expect_output(mds_rpt_xls(mds_dta))
})
kmcconeghy/mdsr documentation built on May 3, 2019, 1:47 p.m.