Попробуй это. (Извините. У меня не было установлено ggdark
. Поэтому я просто использовал theme_gray
для HTML вывода). knitr
предоставляет вспомогательные функции для проверки is_html_output
или is_latex_output
.
---
title: "test"
output:
pdf_document: default
html_document: default
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```
# Plot
```{r}
library(ggplot2)
p <- ggplot(mtcars, aes(hp, mpg)) +
geom_point()
if (knitr::is_html_output()) {
p + theme_gray()
} else if (knitr::is_latex_output()) {
p + theme_classic()
}
```