在不使用包的情况下使用testthat运行单元测试

Question

我有一个闪亮的应用程序，它使用了4个函数。我想测试这些函数，但它不是一个包。我应该如何组织我的代码？并且在没有devtools的情况下执行这些测试？

Answer 1

您可以使用testthat::test_dir()或testthat::test_file()执行测试。这两种方法都不依赖于包中的代码，也不依赖于使用devtools，只依赖于testthat包。

关于如何构建代码，几乎没有什么要求。如果是我，我会创建一个tests目录，并在该目录下添加我的测试脚本，如下所示：

|- my_shiny_app | |- app.R | |- tests | |- test_foo.R | |- test_bar.R

然后，假设您在my_shiny_app目录中，您可以使用test_dir('tests')运行测试。

您的测试脚本将具有相同的structure they have for packages，但您需要将library()调用替换为引用定义函数的文件的source()。

Answer 2

如果您有几个没有包结构的函数，最好是手动编写单个测试文件(使用一些简单的if/error捕获系统)，然后使用Rscript test_file1.R调用。

如果您开始使用包格式(这对于进一步的“安全”开发是明智的)，并且您仍然不想使用testthat，我建议您关注这篇博客文章：here