sorry for not making it clear, but the test for this is in `testit/test-utils.R`