使用xtable在R markdown文件中打印html表

Question

我想在R标记文件中打印一个带有数据框的更好的表格,我知道如何使用kable它来打印它,但我想要一些更多的控制选项,我正在尝试使用该xtable软件包.但是,我真的遇到了一个愚蠢的问题,即它不会打印表格而是html文件中的代码.因此,例如,如果我想打印默认数据集,cars我会这样做:

```{r}
library(xtable)
print(xtable(head(cars)), type = "html")
```

这给了我这段HTML代码.

## <!-- html table generated in R 3.2.5 by xtable 1.8-2 package -->
## <!-- Wed May 25 19:06:33 2016 -->
## <table border=1>
## <tr> <th>  </th> <th> speed </th> <th> dist </th>  </tr>
##   <tr> <td align="right"> 1 </td> <td align="right"> 4.00 </td> <td align="right"> 2.00 </td> </tr>
##   <tr> <td align="right"> 2 </td> <td align="right"> 4.00 </td> <td align="right"> 10.00 </td> </tr>
##   <tr> <td align="right"> 3 </td> <td align="right"> 7.00 </td> <td align="right"> 4.00 </td> </tr>
##   <tr> <td align="right"> 4 </td> <td align="right"> 7.00 </td> <td align="right"> 22.00 </td> </tr>
##   <tr> <td align="right"> 5 </td> <td align="right"> 8.00 </td> <td align="right"> 16.00 </td> </tr>
##   <tr> <td align="right"> 6 </td> <td align="right"> 9.00 </td> <td align="right"> 10.00 </td> </tr>
##    </table>

但我想要一个html表而不是html显示的代码.有人有什么建议吗？

Answer 1

确保将'asis'放在引号中.

```{r, results='asis'}
library(xtable)
print(xtable(head(cars)), type = "html")
```