цикл в knitr через подписи и графики - PullRequest
Новая
       8

цикл в knitr через подписи и графики

0 голосов
/ 26 октября 2018

Предположим, мне нужен следующий набор данных:

data.frame(group=paste0("group",c(rep(1,4),rep(2,4),rep(3,4))),caption=c(paste0("caption",1:12)),png_file=c(paste0("graph",1:12,".png")))

Это выглядит так: 

group   caption    png_file
1  group1  caption1  graph1.png
2  group1  caption2  graph2.png
3  group1  caption3  graph3.png
4  group1  caption4  graph4.png
5  group2  caption5  graph5.png
6  group2  caption6  graph6.png
7  group2  caption7  graph7.png
8  group2  caption8  graph8.png
9  group3  caption9  graph9.png
10 group3 caption10 graph10.png
11 group3 caption11 graph11.png
12 group3 caption12 graph12.png

Предположим, из него я хочу иметь разделы, соответствующиегруппы и по одному пустому подразделу для каждого графа с knitr :: include_graphics () с правой подписью.

Для первых я напишу что-то подобное в моей уценке: 

# group1

##

```{r, echo=FALSE, fig.cap="caption1"}
knitr::include_graphics("graph1.png")
```

##

```{r, echo=FALSE, fig.cap="caption2"}
knitr::include_graphics("graph2.png")
```

и так далее.

Как я могу автоматизировать этот процесс ??Я изо всех сил пытаюсь написать цикл с r кусками, если ...

Может ли кто-нибудь мне помочь?

1 Ответ

0 голосов
/ 26 октября 2018

Это нормально? 

```{r, results='asis'}
cat(sprintf('![%s](%s)', df$caption, df$png_file), sep = '\n')
```
...