указать цифру в другой подписи к рисунку в формате PDF - PullRequest
0 голосов
/ 23 ноября 2018

Используя R уценку с выводом PDF, я хочу привести цифру к другой подписи к рисунку.Я также хочу привести ссылку на BibTex в подписи.Есть идеи?Вот пример кода:

---
title: "Untitled"
author: "me"
date: "today"
output:
  pdf_document: 
    latex_engine: lualatex
    number_sections: no
linestretch: 1.5
bibliography: input/Library.bib
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = FALSE, warning = FALSE, message = FALSE)
```

```{r}
df <- mtcars

library(ggplot2)
```

```{r, fig.cap="some stuff"}
ggplot(df, aes(cyl, mpg)) + geom_point()

```



```{r, fig.cap="some more stuff. here I'd like to cite figure 1. I would also like a BibTex citation"}
ggplot(df, aes(cyl, hp)) + geom_point()
```

1 Ответ

0 голосов
/ 23 ноября 2018

По моему опыту, перекрестные ссылки работают лучше, когда используется bookdown::pdf_document2 или bookdown::html_document2.Обратите внимание, что имеет смысл назвать чанк, который создает рисунок, поскольку это имя используется в метке, используемой для ссылок:

---
title: "Untitled"
author: "me"
date: "today"
output:
  bookdown::pdf_document2: 
    latex_engine: lualatex
    number_sections: no
  bookdown::html_document2:
    default
linestretch: 1.5
bibliography: packages.bib
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = FALSE, warning = FALSE, message = FALSE)
knitr::write_bib(c(.packages()), 'packages.bib')
```

```{r}
df <- mtcars

library(ggplot2)
```

```{r stuff, fig.cap="some stuff"}
ggplot(df, aes(cyl, mpg)) + geom_point()

```



```{r, fig.cap="some more stuff. here I'd like to cite figure \\@ref(fig:stuff). I would also like a BibTex citation [@R-base]"}
ggplot(df, aes(cyl, hp)) + geom_point()
```

Для ссылки на BibTeX я использую автоматически созданный, но адаптацию кваш случай должен быть очевидным.

...