我试图使用kable生成漂亮的表。但是,kable只是在r notebook(在Mac上为R版本3.5.0,在R版本为1.1.453)上返回了html代码而不是表本身。
```{r}
library(knitr)
dt <- mtcars[1:5,1:6]
knitr::kable(dt)
```
R Notebook界面和.html文档中显示的结果:
| | mpg| cyl| disp| hp| drat| wt|
|:-----------------|----:|---:|----:|---:|----:|-----:|
|Mazda RX4 | 21.0| 6| 160| 110| 3.90| 2.620|
|Mazda RX4 Wag | 21.0| 6| 160| 110| 3.90| 2.875|
|Datsun 710 | 22.8| 4| 108| 93| 3.85| 2.320|
|Hornet 4 Drive | 21.4| 6| 258| 110| 3.08| 3.215|
|Hornet Sportabout | 18.7| 8| 360| 175| 3.15| 3.440|
library(knitr)
dt <- mtcars[1:5,1:6]
knitr::kable(dt, format = "html")
R Notebook界面和.html文档中显示的结果:
<table>
<thead>
<tr>
<th style="text-align:left;"> </th>
<th style="text-align:right;"> mpg </th>
<th style="text-align:right;"> cyl </th>
<th style="text-align:right;"> disp </th>
<th style="text-align:right;"> hp </th>
<th style="text-align:right;"> drat </th>
<th style="text-align:right;"> wt </th>
</tr>
</thead>
<tbody>
<tr>
<td style="text-align:left;"> Mazda RX4 </td>
<td style="text-align:right;"> 21.0 </td>
<td style="text-align:right;"> 6 </td>
<td style="text-align:right;"> 160 </td>
<td style="text-align:right;"> 110 </td>
<td style="text-align:right;"> 3.90 </td>
<td style="text-align:right;"> 2.620 </td>
</tr>
<tr>
<td style="text-align:left;"> Mazda RX4 Wag </td>
<td style="text-align:right;"> 21.0 </td>
<td style="text-align:right;"> 6 </td>
<td style="text-align:right;"> 160 </td>
<td style="text-align:right;"> 110 </td>
<td style="text-align:right;"> 3.90 </td>
<td style="text-align:right;"> 2.875 </td>
</tr>
<tr>
<td style="text-align:left;"> Datsun 710 </td>
<td style="text-align:right;"> 22.8 </td>
<td style="text-align:right;"> 4 </td>
<td style="text-align:right;"> 108 </td>
<td style="text-align:right;"> 93 </td>
<td style="text-align:right;"> 3.85 </td>
<td style="text-align:right;"> 2.320 </td>
</tr>
<tr>
<td style="text-align:left;"> Hornet 4 Drive </td>
<td style="text-align:right;"> 21.4 </td>
<td style="text-align:right;"> 6 </td>
<td style="text-align:right;"> 258 </td>
<td style="text-align:right;"> 110 </td>
<td style="text-align:right;"> 3.08 </td>
<td style="text-align:right;"> 3.215 </td>
</tr>
<tr>
<td style="text-align:left;"> Hornet Sportabout </td>
<td style="text-align:right;"> 18.7 </td>
<td style="text-align:right;"> 8 </td>
<td style="text-align:right;"> 360 </td>
<td style="text-align:right;"> 175 </td>
<td style="text-align:right;"> 3.15 </td>
<td style="text-align:right;"> 3.440 </td>
</tr>
</tbody>
</table>
library(knitr)
library(kableExtra)
dt <- mtcars[1:5,1:6]
kable(dt, format = "html")
结果:与上述相同
由于.html文档中的输出还显示了上面的原始html代码而不是html表,这是此版本的kable / r笔记本的错误吗?
更新:
在块选项中添加results = 'asis'
后,输出将成功呈现到.html文档中。但是,我仍然看不到rnotebook。有什么办法可以在RNotebook中看到它吗?谢谢。
```{r results = "asis"}
library(knitr)
library(kableExtra)
dt <- mtcars[1:5,1:6]
kable(dt, format = "html")
```
R Notebook文档中显示的内容
<table>
<thead>
<tr>
<th style="text-align:left;"> </th>
<th style="text-align:right;"> mpg </th>
<th style="text-align:right;"> cyl </th>
<th style="text-align:right;"> disp </th>
<th style="text-align:right;"> hp </th>
<th style="text-align:right;"> drat </th>
<th style="text-align:right;"> wt </th>
</tr>
</thead>
<tbody>
<tr>
<td style="text-align:left;"> Mazda RX4 </td>
<td style="text-align:right;"> 21.0 </td>
<td style="text-align:right;"> 6 </td>
<td style="text-align:right;"> 160 </td>
<td style="text-align:right;"> 110 </td>
<td style="text-align:right;"> 3.90 </td>
<td style="text-align:right;"> 2.620 </td>
</tr>
<tr>
<td style="text-align:left;"> Mazda RX4 Wag </td>
<td style="text-align:right;"> 21.0 </td>
<td style="text-align:right;"> 6 </td>
<td style="text-align:right;"> 160 </td>
<td style="text-align:right;"> 110 </td>
<td style="text-align:right;"> 3.90 </td>
<td style="text-align:right;"> 2.875 </td>
</tr>
<tr>
<td style="text-align:left;"> Datsun 710 </td>
<td style="text-align:right;"> 22.8 </td>
<td style="text-align:right;"> 4 </td>
<td style="text-align:right;"> 108 </td>
<td style="text-align:right;"> 93 </td>
<td style="text-align:right;"> 3.85 </td>
<td style="text-align:right;"> 2.320 </td>
</tr>
<tr>
<td style="text-align:left;"> Hornet 4 Drive </td>
<td style="text-align:right;"> 21.4 </td>
<td style="text-align:right;"> 6 </td>
<td style="text-align:right;"> 258 </td>
<td style="text-align:right;"> 110 </td>
<td style="text-align:right;"> 3.08 </td>
<td style="text-align:right;"> 3.215 </td>
</tr>
<tr>
<td style="text-align:left;"> Hornet Sportabout </td>
<td style="text-align:right;"> 18.7 </td>
<td style="text-align:right;"> 8 </td>
<td style="text-align:right;"> 360 </td>
<td style="text-align:right;"> 175 </td>
<td style="text-align:right;"> 3.15 </td>
<td style="text-align:right;"> 3.440 </td>
</tr>
</tbody>
</table>
答案 0 :(得分:1)
尝试将结果传递给class Program
{
public string TESTVAR = "hey it actually worked! :D";
internal static void newVar(string name, object value)
{
}
static void Main(string[] args)
{
//....
}
}
。它将应用打印方法,以便呈现表格。
答案 1 :(得分:0)
或者您可以使用 kable() knitr::kable(., format = "pipe", padding = 2)