tests/testthat/test_mds_fmt.R

context("Package Functions - mds_fmt.R")

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

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