Question

我正在尝试使用LaTeX命令将特殊格式（阴影行）应用于表的一行，然后将其全部直接输出到HTML。我似乎陷入了“任何/或者”的情况 - 要么包含LaTeX命令，要么得到LaTeX输出，否则命令被省略，我得到HTML。我想按“编织”按钮并获得格式化的报告，其中包含阴影行。

只需按一下按钮，从R代码到LaTeX到HTML输出的流程是什么？

---
title: "Bug List"

output: 
  html_document

---

{r echo=FALSE, results='asis'} 
library(knitr,quietly = TRUE,verbose = FALSE)
library(xtable,quietly = TRUE,verbose = FALSE)
  data<-data.frame(matrix(as.character(rnorm(80,50,2)),ncol=8))
  names(data)<-c("BugActivity","Key","Summary","Priority","ExternalStatus","WaitingFor","InternalStatus","InternalBug")
  shadeCommand <- rep("\\rowcolor[red]{0.90}", 1)
  print(xtable(data), type="html",include.rownames= FALSE, floating=FALSE,
        add.to.row=list(pos=list(4),command=c("\\rowcolor[gray]{.8} ")))            
```

环境：Windows上的R Studio

非常感谢！

Answer 1

我显然有偏见......但pixiedust *允许您使用相同的命令集在latex或html中创建表格（尽管乳胶输出比html略有限制）。

---
title: "Bug List"
output:
  html_document: null
  pdf_document: null
header-includes:
- \usepackage[dvipsnames,table]{xcolor}
- \usepackage{longtable}
- \usepackage{arydshln}
- \usepackage{amssymb}
- \usepackage{graphicx}
- \usepackage{multirow}
---

```{r, echo=FALSE}
library(pixiedust)
set.seed(55)
data<-data.frame(matrix(as.character(rnorm(80,50,2)),ncol=8))
names(data)<-c("BugActivity","Key","Summary","Priority",
               "ExternalStatus","WaitingFor","InternalStatus","InternalBug")

dust(data) %>%
  sprinkle(rows = 5, 
           bg = "#D0D0D0") %>%
  medley_bw() %>%
  sprinkle_print_method("html")
```

如果要将输出更改为latex，只需将最后一行更改为sprinkle_print_method("latex")

*立即使用开发版devtools::install_github("nutterb/pixiedust")。这个版本应该在1月下旬的某个时候升级到CRAN。

R xtable：LaTex命令输出到HTML

1 个答案: