tests/testthat/test.R

library(openWARData)


test_that("data are tbls", {
  expect_is(MLBAM2012, "GameDayPlays")
  expect_is(idTT, "tbl_df")
  expect_is(idBP, "tbl_df")
  expect_is(rWAR, "tbl_df")
  expect_is(fWAR, "tbl_df")
})
beanumber/openWARData documentation built on May 12, 2019, 9:47 a.m.