限制R中的ggplot2 x轴大小

Question

我试图将 ggplot 输出限制为仅感兴趣的范围，并排除热图两侧的无关灰色边距。我应该向我的函数添加什么参数？

heatmap <- function(df, .x_var, .y_var, .z_var) {

  x_var <- sym(.x_var)
  y_var <- sym(.y_var)
  z_var <- sym(.z_var)

  ggplot(df, aes(x = !! x_var, y = !! y_var, fill = !! z_var)) + 
    geom_tile(colour = "black") +
    scale_x_discrete(limits = c(2008:2018)) +
    theme(axis.text.y = element_text(size = 6))
}

Answer 1

添加scale_x_discrete(expand = c(0,0))到情节中应该可以解决问题。