我想就如何使用R中的华夫饼包来减少华夫饼图表中的空白提供一些帮助。
下面是代码:
waffle(table(dat$Age.Group),
rows=5,
title="Demographic Age Groups")然后它显示如下:

当我编织它的时候,它占用了太多的空间,参考图片:

我想把文本更接近情节,这样它就不会显得尴尬,这样我就可以在一页中加入更多的华夫饼图表。
我真的什么都没试过,除了改变正方形之间的间距,但这似乎不是问题所在。我也查过类似的问题,但我找不到任何可以消除保证金的办法。
提前谢谢你!
发布于 2022-09-14 07:09:09
问题是waffle在幕后使用了coord_equal。因此,不调整绘图的大小以填充输出设备的大小。如果输出设备的大小大于绘图所需的大小,则将填充空白。
一种选择是在equal=FALSE中设置waffle。然而,在这种情况下,您将不再得到正方形,而是矩形。
第二个选项是通过块选项减少输出设备的大小或高度,即Rmarkdown或knitr用于呈现默认为7x7英寸的图形的大小。为此,您可以设置fig.height,也可以使用fig.asp作为替代设置高宽比。
---
output: pdf_document
---
```{r setup, include=FALSE}Knitr::opts_chunk$set(回声=假)
```{r, include=FALSE}图书馆(华夫饼)
```{r, include=FALSE}零件<- c(One=80,Two=30,Three=20,Four=10)
图表<-华夫饼(parts,rows=8,equal = FALSE)
```{r fig.cap="Default"}图表+ggplot2 2::labs(title= "Default")
```{r fig.asp=.4, fig.width = 7, fig.cap="Set the aspect ratio"}图表+ggplot2 2::labs(title=“设置高宽比”)
```{r fig.height = 2.8, fig.width = 7, fig.cap="Reduce the figure height"}图表+ggplot2 2::labs(title=“减少图形高度”)

https://stackoverflow.com/questions/73712014
复制相似问题