如何测试小插图？

Question

R CMD CHECK验证小插图中的代码是否运行，但未生成 小插图。我想添加一个确实可以构建的测试，例如：

test_that("Vignette builds", {

  print(getwd())
  # This is one way to test no failures
  expect_failure(expect_warning(devtools::build_vignettes("..")))
})

如果我从包的根目录这样调用它，则测试通过：

Rscript -e "devtools::test_file(file = 'testthat/test_vignette.R');"

，而不是如果我从devtools::test()运行它，可能是因为小插图文件 不会复制到临时目录：

"/private/var/folders/zx/j_gjm0ld081b_mcqmg3gp9l1zp59y6/T/RtmpoeLI5T/PosteriorBootstrap.Rcheck/tests/testthat"
── 1. Error: Vignette builds (@test_vignette.R#9)  ─────────────────────────────

如何测试小插图的构建？还是通常的做法是不进行测试？