################################################################################ context("test-message") ################################################################################ test_that("printf works", { expect_identical(capture.output(printf("My name is %s.", "Florian")), "My name is Florian.") }) ################################################################################