小编jam*_*121的帖子

我正在尝试使用 rmarkdown 构建一个投影仪演示文稿。在我的演示文稿中，我想包含使用kable, 和kableExtra包的表格。我遇到了这个问题，因为kableExtra需要的 LaTex 包之一已经由具有不同选项的投影仪演示加载。这是我收到的错误消息。

! LaTeX Error: Option clash for package xcolor.

我一直在寻找解决此问题的方法，但没有任何运气。我在 LaTex 页面上找到了解决方案，here和here，但我不知道 LaTex，我还没有想出如何在 rmarkdown 领域应用这些解决方案。我曾尝试查看 rmarkdown 中的 Latex 模板，但我对它的理解不够深入，无法尝试实施这些解决方案。

任何想法或解决方案将不胜感激。这里只是给出错误的 .Rmd 的一个快速示例。

---
title: "Untitled"
author: "Author"
date: "April 28, 2018"
output: 
  beamer_presentation:
    keep_tex: true
header-includes:
- \usepackage[table]{xcolor}
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = FALSE)
library(knitr)
library(kableExtra)
dt <- mtcars[1:5, 1:6]
```


## Slide with R Output

```{r cars, echo = TRUE}
kable(dt, format = …

我正在重新编写一些旧代码以方便学习tidyverse. 在上面的代码我会做，从目前的变量derrived新的变量，我想给这些新的变量，使用标签属性label从Hmisc包。这看起来像这样。

library(Hmisc)

iris$new <- ifelse(iris$Species == 'setosa', 1, 0)
label(iris$new) <- "New Variable"

这给出了这个结果

> str(iris$new)
 'labelled' num [1:150] 1 1 1 1 1 1 1 1 1 1 ...
 - attr(*, "label")= chr "New Variable"

我想知道是否有办法在 mutate 调用中应用这种相同类型的东西。

我有一个使用 kable 和 kableExtra 为 pdf 演示文稿创建的表格。我想对行进行分组，并且需要在行组标签中使用上标。我尝试了几种不同的方法。这是我迄今为止尝试过的一些方法的示例。

library(kable)
library(kableExtra)

foo <- data.frame(a = 1:10, b = 11:20, c = 21:30)

kable(foo, format = "latex", booktabs = T, row.names = FALSE, linesep = "", escape = FALSE) %>%
  kable_styling(latex_options = c("striped")) %>%
  group_rows("Group1<sup>a</sup>", 1, 2) %>% 
  group_rows(paste0("Group2", footnote_marker_alphabet(1), sep = ""), 3, 4) %>% 
  group_rows(expression("Group3"^a), 5, 6) %>% 
  group_rows("Group4\\textsuperscript{a}", 7, 8)

我的想法已经用完了，并且无法在我的搜索中找到任何其他建议。