xtable+knifer设置列宽html

Question

如何使用xtable包设置代码块的knitr（Rmd）输出中各个列的列宽？

MWE

```{r setup, include=FALSE}
library(xtable)
```
```{r, results="asis", echo=FALSE}
print(xtable(mtcars[1:2, 1:2]), type="html", include.rownames=FALSE)
```

比方说，我想使column_#1-2英寸宽，column_#2-3英寸宽。

我在这里没有嫁给xtable，但不知道有任何其他html表输出包可以做到这一点。

Answer 1

您可以更改xtable用于格式化表和更改列宽的css。但是，它不允许更改单个列。

请参阅http://nsaunders.wordpress.com/2012/08/27/custom-css-for-html-generated-using-rstudio/

以下示例：

将样式表（此处命名为custom.css）添加到与markdown文件相同的文件夹中。

table {
   max-width: 95%;
   border: 1px solid #ccc;
 }
th {
  background-color: #000000;
    color: #ffffff;
    width: 100px;
}
td {
  background-color: #dcdcdc;
  width: 100px;
}

并设置使用此样式表的选项

```{r setup, include=FALSE}
library(xtable)
options(rstudio.markdownToHTML = 
       function(inputFile, outputFile) {      
       require(markdown)
       markdownToHTML(inputFile, outputFile, stylesheet='custom.css')   
      }
)
```
```{r, results="asis", echo=FALSE}
print(xtable(mtcars[1:2, 1:2]), type="html", include.rownames=FALSE)
```

也许可以破解print.xtable函数以获得更大的灵活性。