tests/testthat/test-attacks.R

In psmits/mathhammr: Tools for Dice Roll Simulations in Warhammer40k 8th

context('attacks')

# error ------------------------------------------------------------------------


# return -----------------------------------------------------------------------

test_that('to_attack() returns a numeric', {
  rr <- to_attack(n = 1, skill = 3)
  expect_true(is(rr, 'numeric'))
})