tests/testthat/test_osd_data.R

context("Testing osd_data.R function")

test_that('data types, dimension of test data', {
  expect_is(osd_data,'data.frame')
  expect_equal(nrow(osd_data), 1465)
  expect_equal(ncol(osd_data), 3)
})
MAnalytics/opitools documentation built on March 21, 2023, 11:50 p.m.