rmarkdownエスケープhtml in kable

Question

私はkableテーブルのセルにいくつかのカスタムHTMLクラスを与えようとしています。しかし、問題は、divがセルの内容のようにエンコードされるということです。 光沢のあるテーブルには、セルのコンテンツをエスケープして解釈する方法があることを覚えています。 rmarkdown/knitrにはこれがありますか？例えば

：

make_green function(x) { 
    x <- paste('<div class="button is-success">',x,">/div>") 

    return(x) 
} 

new_df <- iris %>% mutate(speci = make_green(Species)) 
kable(head(new_df)) 

戻り、このような何か：

<td style="text-align:right;"> 5.1 </td> 
<td style="text-align:right;"> 3.5 </td> 
<td style="text-align:right;"> 1.4 </td> 
<td style="text-align:right;"> 0.2 </td> 
<td style="text-align:left;"> setosa </td> 
<td style="text-align:left;"> &lt;div class=&quot;button is-success&quot;&gt; setosa &lt;/div&gt; </td> 

が、私はそれはのようなものを返すしたいと思います：

<td style="text-align:right;"> 5.1 </td> 
<td style="text-align:right;"> 3.5 </td> 
<td style="text-align:right;"> 1.4 </td> 
<td style="text-align:right;"> 0.2 </td> 
<td style="text-align:left;"> setosa </td> 
<td style="text-align:left;"> <div class="button is-success"> setosa 
</div</td> 

ここでの違いはありますレンダリング時

Answer 1

使用escape = FALSE：

kable(head(new_df), format = "html", escape = FALSE)