test_that("cat0() works", { f <- kwb.dwd:::cat0 expect_output(f("abc", "def"), "abcdef") })
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.