r - 在 for 循环中使用 knit::include_graphics 插入图像

Question

```{r}
knitr::include_graphics(path = "~/Desktop/R/Files/apple.jpg/")
```

上面的代码块工作正常。但是，当我创建 for 循环时，knitr::include_graphics 似乎不起作用。

```{r}
fruits <- c("apple", "banana", "grape")
for(i in fruits){
  knitr::include_graphics(path = paste("~/Desktop/R/Files/", i, ".jpg", sep = ""))
}
```

Answer 1

这是一个已知问题 knitr include_graphics doesn't work in loop #1260 .

解决方法是在 for 循环中生成图像路径并cat 它们。要显示最终结果，需要 result = "asis"。

```{r, results = "asis"}
fruits <- c("apple", "banana", "grape")
for(i in fruits) {
    cat(paste0("![](", "~/Desktop/R/Files/", i, ".jpg)"), "\n")
}
```

这里每次迭代都会生成图形的 markdown 路径(例如，"![](~/Desktop/R/Files/apple.jpg)")