tests/testthat/test_episode.R

# test that episode works correctly

context("epsiode()")

test_that("Episode throws errors",{

  # fail when not a valid series
  expect_error(epsiode("foo"))
  # fail when season doesn't exist
  expect_error(epsiode("TOS", 17))

})
karawoo/staRtrek documentation built on May 18, 2017, 3:26 p.m.