r - 格式化 R 代码块中的文本

Question

我正在按照此处的说明在 Rstudio 中制作一些幻灯片:
http://rmarkdown.rstudio.com/beamer_presentation_format.html

如何将数字后的文本大小、颜色和“流”定义为两列？

```{r,results='asis', echo=FALSE}
rd <- sample(x=1e6:1e7, size = 10, replace = FALSE)
cat(rd, sep = "\n")

```

输出是 HTML (ioslides) 或 PDF (Beamer)

更新:

目前，上面的代码只会给出如下内容

6683209
1268680
8412827
9688104
6958695
9655315
3255629
8754025
3775265
2810182

我无法更改文本大小、颜色或将它们放入表格中。 R codechunk 的输出只是纯文本。正如这篇文章所述，也许确实可以将它们放在一张 table 上:

http://tex.aspcode.net/view/635399273629833626273734/dynamically-format-labelscolumns-of-a-latex-table-generated-in-rknitrxtable

但我不知道文字大小和颜色。

更新 2:

将原生 HTML 代码编织到 R 输出的想法非常有用。我没有想到这一点。但是，这仅在我想输出 HTML 时才有效。对于 PDF 输出，我必须将原生 Latex 代码与 R 输出结合起来。例如，以下代码使用“knitr PDF”输出:

```{r,results='asis', echo=FALSE}
cat("\\textcolor{blue}{") 
rd <- sample(x=1e6:1e7, size = 10, replace = FALSE) 
for (n in rd) {
cat(paste0(n, '\\newline \n')) } 
cat("}")
```

Answer 1

您正在使用 results='asis'，因此，您可以简单地使用 print()和格式化标记。如果您希望文本为红色，只需执行以下操作:

```{r,results='asis', echo=FALSE}
print("<div class='red2'>")
rd <- sample(x=1e6:1e7, size = 10, replace = FALSE)
cat(rd, sep = "\n")
print("</div>")
```

希望能帮助到你。