r - 如何删除/删除ggplot2中条形和面板之间的空间？

Question

以下代码生成附加图。如何摆脱/删除标记为RED的区域？

    df <- data.frame(trt = c("a", "b", "c"), outcome = c(2.3, 1.9, 3.2))
    ggplot(df, aes(trt, outcome)) +
    geom_col()

我修改了代码如下，但没有改变。

df <- data.frame(trt = c("a", "b", "c"), outcome = c(2.3, 1.9, 3.2))
   
ggplot(df, aes(trt, outcome)) +
   geom_col() + 
   theme(
    plot.margin = unit(c(0,0,0,0), "mm")
  )

Answer 1

您可以expand在两个轴上设置为 0 ：

library(ggplot2)
df <- data.frame(trt = c("a", "b", "c"), outcome = c(2.3, 1.9, 3.2))

ggplot(df, aes(trt, outcome)) +
  geom_col() + 
  scale_x_discrete(expand = c(0,0)) + 
  scale_y_continuous(expand = c(0,0))

Answer 2

边距选项用于绘图窗口之外。要在绘图窗口内更改，请尝试以下操作：

ggplot(df, aes(trt, outcome)) +
  geom_col() + 
  coord_cartesian(expand = F)