调整 Rmarkdown 中的图形边距

Question

我正在尝试调整 Rmarkdown 文档中的饼图，使其跨越页面的宽度或至少变得足够宽以适合所有标签。

我已经尝试了一切 - 调整

figure.height

和

figure.width

，用

par(mar)

和

par(oma)

调整边距，但似乎没有任何效果。要么馅饼本身变小，要么标签被切断得更多。我希望馅饼尽可能大并带有清晰可见的标签，但每次它都会渲染小馅饼和微小标签。

是否至少有一种解决方法，使标签不会被切断（或可以与相邻图表重叠）？任何建议，将不胜感激。

```{r, figure.align = "center", figure.height = 10, figure.width = 12}

par(mfrow=c(1,3), cex.axis=1.5, cex.lab=1.5) 
par(mar = c(4,2,4,2))
par(oma = c(3, 3, 3, 3))
pie(a, labels = lbls,  font = 2, col = c("tomato", "white"), cex=2)
pie(b, lbls2, font = 2, col = c("tomato", "white"), cex=2) 
mtext(side=3, text="Plan Breakdown: Top 20% of Users")
pie(c, lbls3,  font = 2, col = c("tomato", "white"))

Answer 1

除非您指定了 out.width，否则您的图形尺寸将受到文档边距的限制。如果您的图形宽度大于页面的边距，则 R Markdown/knitr 将创建指定宽高比的图形，但将其缩小以适合页边距。

要解决此问题，请使用 out.width 设置 pdf 中绘图的宽度和高度。比如：

```{r, fig.align = "center", fig.height = 8, fig.width = 8,
    out.width = "8.5in"}

pie(a, labels = lbls,  font = 2, col = c("tomato", "white"), cex=2)
pie(b, lbls2, font = 2, col = c("tomato", "white"), cex=2) 
mtext(side=3, text="Plan Breakdown: Top 20% of Users")
pie(c, lbls3,  font = 2, col = c("tomato", "white"))
````

请参阅本页有关knitr chunk选项了解更多信息。

Answer 2

我遇到了同样的问题，似乎默认情况下应用了一些裁剪，将其添加到 yaml-header 中对我有用：

output: 
  pdf_document: 
    fig_crop: no

Answer 3

您可以尝试使用块选项“out.width”。这是我使用的 Rmd 文件。我认为它可以满足您的要求。

    ---
    output: pdf_document
    ---


    ```{r, out.width='\\textwidth', fig.height = 8, fig.align='center'}
    pie(c(0.57, 0.43), font = 2, col = c("tomato", "white"))

    pie(c(0.57, 0.43), font = 2, col = c("blue", "orange"))
    ```

Answer 4

您可以前往 文件

这会增加 Markdown 文档的宽度