后台

这是我在Rstudio中的.qmd文档中的代码。我打算在Rstudio中使用夸托文档编写一个报告。

---
title: "Quarto test document"

format: 
  pdf:
    pagesize: "a4"
    number-sections: true
    number-depth: 2
    margin-left: 30mm
    margin-right: 30mm
    execute:
      include: true
      warning: false
      error: false
      freeze: false
    fig-cap-location: bottom
    fig-dpi: 300
    fig-align: center
    fig-format: pdf
---

# Creating picture

\`\`\`{r}
#| label: fig-myplot
#| fig-cap: "This is the label of picture."
#| fig-height: 3
#| fig-width: 4
#| layout-nrow: 1
#| column: page

plot(1:7, abs(-3 : 3))
hist(cars$speed)
\`\`\`

字符串

提问

的数据
你可以看到除了“图1”和“图2”之外，有两个重复的相同标签。事实上，我只需要“图1：这是图片的标签”。

我尝试过的方法

1.添加#| fig-subcap:

我把它们添加到R chunk中：

#| fig-cap: "This is the label of picture."
#| fig-subcap: 
#|  - ""
#|  - ""
#| fig-height: 3

型

的
你可以看到重复的标签消失了。只有一个“图1：这是图片的标签”（见绿色线）。这是我想要的目标。但是，这些标签(a)和(b)（见红线）在每张图片的左下方。实际上，它们应该放在期刊论文中每张图片的左上角位置。这不是很好的展示。

2. patchwork或类似方法

我使用mfrow=c(1,2)，patchwork的ggplot图片合并两张图片合并成一个。

如您所见，我使用patchwork实现了预期的结果，但是否可以直接修改夸托文档中的YAML和#|部分来实现这些效果？毕竟，当我想将（a）使用plot(y~x)的图形和（b）使用ggplot()的图形合并为一个图形时，mfrow=c(x,x)，patchwork，ggside，和ggarrange变得无效。使用grid & gridExtra当然是可能的，但是代码看起来会非常冗余。我认为这并不优雅。我认为目前最好的方法是修改YAML和R chunk部分的#|内容，这是最优雅的方法。
救救我

**1.**在### Question部分，如果我可以只保留“图1：这是图片的标签”，而不保留“图2：这是图片的标签”，通过在R chunk或YAML组件中修改#|部分，将会有很大的帮助。
**2.**如果我能在（a）和（B）标签都存在的情况下，通过修改R chunk或YAML组件中的x1m20 n1x部分，将（a）和（B）标签移到每个图的左上角，只保留一个标签“图1：这是图片的标签"，也会有很大的帮助。

上述解决方案中的任何一个都将受到极大的赞赏。