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 Aug. 1, 2018, 10:41 p.m.