如何在命令行中复制针织HTML？

Question

我知道这个问题类似于this之一。但我无法在那里找到解决方案，因此再次在此发布。

我想通过点击“编织HTML”，但通过命令获得与我相同的输出。我tryied使用knit2html但它与格式食堂，不包括标题，kable不工作等

例子：

这是我test.Rmd文件，

--- 
title: "test" 
output: html_document 
--- 

This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see <http://rmarkdown.rstudio.com>. 

When you click the **Knit** button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this: 

```{r} 
library(knitr,quietly=T) 
kable(summary(cars)) 
``` 

You can also embed plots, for example: 

```{r, echo=FALSE} 
plot(cars) 
``` 

Note that the `echo = FALSE` parameter was added to the code chunk to prevent printing of the R code that generated the plot. 

输出：

针织HTML

knit2html

Answer 1

的documentation告诉我们：

如果你不使用RStudio那么你只需要调用rmarkdown::render功能，例如：

rmarkdown::render("input.Rmd") 

请注意，在使用RStudio中的“编织”按钮的基本机制是相同的（RStudio在引擎盖下调用rmarkdown::render功能）。

从本质上说，rmarkdown::render可以做更多的设置比knitr::knit2html，虽然我没有的所有差异的详尽清单。

渲染输出的最灵活的方式是，无论如何，根据您的意愿提供自己的样式表来格式化输出。

请注意，您需要在命令行上使用set up Pandoc manually与rmarkdown::render一起使用。

---

也就是说，这里有两个的话，将提高knitr::knit2hmtl输出，以及优于在我看来，使用rmarkdown::render：

• 要包括标题，使用减价标题标签，而不是一个YAML标签：

  # My title 
  

• 要格式化表格，不要使用原始kable功能。实际上，在使用rmarkdown::render时也是如此：表格单元的对齐完全关闭。 Rmarkdown显然使用居中作为默认对齐方式，但这个选项几乎从不正确。相反，您应该左对齐文本和（通常）右对齐数字。在撰写本文时，Knitr不能这样自动（据我所知），但它很容易包括过滤器为你这样做：

  ```{r echo=FALSE} 
  library(pander) 
  
  # Use this option if you don’t want tables to be split 
  panderOptions('table.split.table', Inf) 
  
  # Auto-adjust the table column alignment depending on data type. 
  alignment = function (...) UseMethod('alignment') 
  alignment.default = function (...) 'left' 
  alignment.integer = function (...) 'right' 
  alignment.numeric = function (...) 'right' 
  
  # Enable automatic table reformatting. 
  opts_chunk$set(render = function (object, ...) { 
      if (is.data.frame(object) || 
       is.matrix(object)) { 
       # Replicate pander’s behaviour concerning row names 
       rn = rownames(object) 
       justify = c(if (is.null(rn) || length(rn) == 0 || 
           (rn == 1 : nrow(object))) NULL else 'left', 
          sapply(object, alignment)) 
       pander(object, style = 'rmarkdown', justify = justify) 
      } 
      else if (isS4(object)) 
       show(object) 
      else 
       print(object) 
  }) 
  ```