knitr：目的の出力が失敗したテストを含めるPDF

Question

テストを追加して（Rmdファイルをテストするのではなく、テストをドキュメントに追加する）、Rmdファイルに失敗しますが、knitrを使用してpdfを生成できません。失敗したテストで停止するためです。これを達成する方法は？コード：

--- 
title: "test" 
output: 
    pdf_document: default 
    html_document: default 
--- 

```{r, error=TRUE} 
    library(testthat) 
    expect_equal(1, 2) 
``` 

```{r, error=TRUE} 
    library(testthat) 
    expect_equal(1, 1) 
``` 

ENV：

R version 3.3.1 (2016-06-21) 
Platform: x86_64-redhat-linux-gnu (64-bit) 
[...] 
loaded via a namespace (and not attached): 
[1] backports_1.0.5 magrittr_1.5 rprojroot_1.2 htmltools_0.3.5 tools_3.3.1  yaml_2.1.14  Rcpp_0.12.9  
[8] stringi_1.1.2 rmarkdown_1.3 knitr_1.15.1 stringr_1.2.0 digest_0.6.12 evaluate_0.10 

Answer 1

test_thatを使用するためのソリューションです。次のコードは完璧に動作します：test_thatの最初の引数は、テストのための名前であることを

```{r, error=TRUE} 
    library(testthat) 
    test_that(1, expect_equal(1, 2)) 
``` 

```{r, error=TRUE} 
    test_that(2, expect_equal(1, 1)) 
``` 

は注意してください。