如何将标题(透明)带入 r markdown 中的图像
How to bring caption (with transperancy) into an image in r markdown
我尝试在 r markdown 中制作一个基本结构文件,我可以在其中显示 2 张图像。
如何将具有透明度的标题带入图像中。
有人可以告诉我如何将 r markdown 代码作为问题提出吗? 3 个反引号一直有效到下一个 ``` ...,这是一堆代码垃圾的问题。谢谢。
输出:
.
期望的输出:
代码:
---
title: "test"
author: "TJ"
date: "7 1 2021"
output: html_document
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
## R Markdown
![](output.png)
## desired Output with caption in images
![](desired_output.png)
您可以使用包 magick
中的 image_read
和 image_annotate
。这是一个例子:
library(magick)
yoda <-image_read(path = "yoda.jpg")
image_annotate(
yoda,
"Figure 1A",
size = 30,
color = "white",
boxcolor = adjustcolor("black", alpha = 0.2), #change the alpha value for more of less transparency
gravity = "southwest"
)
如果您想指定标题的位置,您可以将 gravity = "southwest"
替换为 location = " your cordinates"
。例如:
image_annotate(
yoda,
"Figure 1A",
size = 30,
color = "white",
boxcolor = adjustcolor("black", alpha = 0.2), #change the alpha value for more of less transparency
location = "+10+400"
)
有关 magick package here 的更多信息。
关于文中将Markdown写成代码的第二个问题:
Select 您想要的文本作为代码,然后按 tab
两次:
我尝试在 r markdown 中制作一个基本结构文件,我可以在其中显示 2 张图像。 如何将具有透明度的标题带入图像中。 有人可以告诉我如何将 r markdown 代码作为问题提出吗? 3 个反引号一直有效到下一个 ``` ...,这是一堆代码垃圾的问题。谢谢。
输出:
期望的输出:
代码:
---
title: "test"
author: "TJ"
date: "7 1 2021"
output: html_document
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
## R Markdown
![](output.png)
## desired Output with caption in images
![](desired_output.png)
您可以使用包 magick
中的 image_read
和 image_annotate
。这是一个例子:
library(magick)
yoda <-image_read(path = "yoda.jpg")
image_annotate(
yoda,
"Figure 1A",
size = 30,
color = "white",
boxcolor = adjustcolor("black", alpha = 0.2), #change the alpha value for more of less transparency
gravity = "southwest"
)
如果您想指定标题的位置,您可以将 gravity = "southwest"
替换为 location = " your cordinates"
。例如:
image_annotate(
yoda,
"Figure 1A",
size = 30,
color = "white",
boxcolor = adjustcolor("black", alpha = 0.2), #change the alpha value for more of less transparency
location = "+10+400"
)
有关 magick package here 的更多信息。
关于文中将Markdown写成代码的第二个问题:
Select 您想要的文本作为代码,然后按 tab
两次: