R语言 减少plot_summs中元素之间的间距

zzwlnbp8  于 2022-12-25  发布在  其他
关注(0)|答案(1)|浏览(181)

我需要“缩小”图中的白色区域--我需要这两个系数彼此更接近。我该怎么做呢?
我使用这个代码:

library(jtools)
library(ggplot2)

states <- as.data.frame(state.x77)
fit1 <- lm(Income ~ Frost + Illiteracy + Murder +
             Population + Area + `Life Exp` + `HS Grad`,
           data = states, weights = runif(50, 0.1, 3))
p <- plot_summs(fit1, 
                coefs = c("Frost Days" = "Frost", "% Illiterate" = "Illiteracy"),
                scale = TRUE)
p + 
  geom_text(aes(label = round(estimate)), vjust=-1)+
  theme(legend.position = "none")

ffx8fchx

ffx8fchx1#

有三个选项可以消除行之间的多余空间:
1.减小绘图窗口的垂直尺寸
1.保持绘图窗口的大小不变,但减小绘图窗口中的绘图高度
1.保持绘图窗口和绘图大小相同,但减小线间距
以下是每个步骤的操作方法:

1.减小绘图窗口的垂直尺寸

如果您只是简单地拖动窗口使其变矮,则绘图将变为:

2.降低绘图窗口中的绘图高度

如果要以编程方式执行此操作而不更改打印输出大小,可在theme中设置aspect.ratio

p + 
  geom_text(aes(label = round(estimate)), vjust=-1)+
  theme(legend.position = "none", aspect.ratio = 1/4)

当然,现在你只是在情节周围有了更多的白色。

3.减小行间距

如果你想让这些线靠得更近而不减少轴的尺寸等,你可以:

p + 
  geom_text(aes(label = round(estimate)), vjust=-1)+
  theme(legend.position = "none") +
  scale_y_discrete(expand = c(2, 1))

当然,您现在在行的两侧都有大量浪费的空间。
在我看来,第一种选择是迄今为止最具美感、最专业、最明智的。

相关问题