我想使用不同颜色(例如红色)突出显示的某个代码块来表示这是不好的做法。如果我正在使用.Rnw，我可以添加chunk选项background =’red’，并得到我想要的，但这似乎不适用于.Rmd。我的猜测是，我需要制作一个自定义的CSS样式表(虽然选择器是什么，我不知道)，也可能创建一个自定义钩子。我希望它是一个大块的基础，而不是整个文档的整体变化。
解决方法
我现在已经尝试过了这是我的出发点：
Add a CSS class to single code chunks in RMarkdown
我可能设置一个名为“badCode”的类，然后有一点css可以改变背景。
这是我的Rmd
---
title: Background color
output:
html_document:
css: badCode.css
---
```{r,include=FALSE}
knitr::knit_hooks$set(source = function(x,options) {
str_class <-
ifelse(
is.null(options$class),"",paste0(".",options$class,collapse = " ")
)
c(
paste0("```{.r ",str_class,"}\n"),x,"\n```"
)
})
```
```{r mtcars}
library("magrittr")
mtcars %>%
summary()
```
```{r cars,class="badCode"}
summary(cars)
```
这是badCode.css：
.badCode {
background-color: red;
}
我确定这可以更干净地完成。
