У меня есть несколько графиков ggplot2
с большим количеством текста в них (никоим образом), который я строю внутри *.Rmd
, например:
---
title: "SO Test"
output: pdf_document
---
```{r}
library(ggplot2)
df <- data.frame(rep(1:5,5),rep(1:5, each=5),rep("Test",5))
colnames(df) <- c("x", "y", "word")
ggplot(data = df, mapping = aes(x = x, y = y, label = word)) + geom_text()
```
Это отлично работает, давая мне что-то вроде ниже как PDF.
Теперь я хотел бы сделать эти метки (Test
) максимально возможными без переопределения.
Моя проблема в том, что теперь я вижу 2 "рычаги", которые я мог бы потянуть, чтобы изменить размер шрифта:
- "внутрь"
ggplot2
, изменить, добавить, скажем,geom_text(size=12)
- при построении "внутри"
knitr
(илиRmarkdown
?) добавьте параметр chunk, например `fig.width = 15, fig.height = 15), который также изменяет размер шрифта по отношению к общему графику размер (по причинам, которые я действительно не понимаю).
Очевидно, что 1. будет простым способом, но мне тогда нужно настроить geom_text(size=...)
всегда в зависимости от размера вывода, скажем, при изменении linewidth
в LaTeX или ширину столбца моего сообщения в блоге.
Это кажется неэлегантным, если не сказать больше.
Как мне это сделать элегантным, масштабируемым способом, который создает красивый сюжет?
Я все еще немного расплывчатый, и где в toolchain (Rmarkdown
?, knitr
?, ggplot2
) я должен начать...
Ps: в качестве бонуса размер шрифта должен быть достигнут программно, потому что длина строки Text
изменяется в зависимости от сюжета в сюжет в реальной жизни.