Я использую extrafont::embed_fonts
для встраивания шрифтов в простой документ с разметкой R. Это прекрасно работает.
Однако после встраивания шрифтов, содержащихся в документе, любые ссылки (внутренние ссылки, URL-адреса, цитаты) не работать больше.
Ниже предоставляется MWE с примером вывода (с и без встраивания). Большое спасибо за помощь!
MWE:
---
title: "Embedding Fonts in PDF"
output: pdf_document
---
```{r echo=FALSE, message=FALSE, warning=FALSE, out.width = '30%'}
library(ggplot2)
library(extrafont)
# font_import() # run
loadfonts() # loadfonts
```
### Plot with standard font {#standard}
```{r echo=FALSE, message=FALSE, warning=FALSE, out.width = '30%'}
ggplot(mtcars, aes(x=wt, y=mpg)) + geom_point() +
ggtitle("Fuel Efficiency of 32 Cars") +
xlab("Weight (x1000 lb)") + ylab("Miles per Gallon")
```
### Load fonts and set ggplot theme globally
```{r message=FALSE, warning=FALSE, include=FALSE}
# install.packages("extrafont") # see https://github.com/wch/extrafont/
# library(extrafont)
# font_import() # run
loadfonts() # loadfonts
# globally set ggplot2 theme and font ("Lato Light")
theme_set(theme_minimal(base_size=12, base_family="Lato Light"))
```
### Plot with new standard font (= Lato) {#lato}
```{r echo=FALSE, message=FALSE, warning=FALSE, out.width = '30%'}
ggplot(mtcars, aes(x=wt, y=mpg)) + geom_point() +
ggtitle("Fuel Efficiency of 32 Cars") +
xlab("Weight (x1000 lb)") + ylab("Miles per Gallon")
```
### Plot with Impact font {#impact}
```{r echo=FALSE, message=FALSE, warning=FALSE, out.width = '30%'}
ggplot(mtcars, aes(x=wt, y=mpg)) + geom_point() +
ggtitle("Fuel Efficiency of 32 Cars") +
xlab("Weight (x1000 lb)") + ylab("Miles per Gallon") +
theme(text=element_text(size=16, family="Impact"))
```
### Run to embed fonts
```{r eval=FALSE, include=TRUE}
embed_fonts("TestRmd.pdf", outfile="TestRmd_embedded.pdf")
```
### Links test
Links test 1 (internal reference): [Headline standard](#standard)
Links test 2 (URL): [RStudio has become a Public Benefit Corporation](https://blog.rstudio.com/2020/01/29/rstudio-pbc)
Sidenote: Встраивание шрифтов кажется необходимым для «стандартных» шрифтов, таких как impact
MWE: вывод со встроенными шрифтами
MWE: вывод со встроенными шрифтами