test_that('at_bats runs end-to-end', expect_true({ AB <- at_bats(c('bb', 'k', '1b', 'hr')) TRUE }))
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.