使用expand=c(0,0)时ggplot2坐标轴刻度与边框对齐问题

问题描述 #

我使用expand = c(0, 0)去除图表零值与边框之间的空白，但将图表保存为png格式时，刻度线一半在边框内一半在边框外。尝试过加粗边框，无法解决问题，希望找到让刻度线与边框对齐的方法，让图表更美观。

复现代码：

df<-data.frame(x=c("T1", "T2", "T3"), y=c(48, 24, 26))
ggplot(data=df, aes(x, y))+
  geom_col()+ 
  theme_bw()+
  scale_y_continuous(expand = c(0, 0), limits = c(0, 60), breaks=c(0, 12, 24, 36, 48, 60))

解决方法 #

• 调整刻度线位置与缩进
  通过theme()修改刻度线长度，让刻度线完全向内缩进，同时调整坐标轴文本的边距避免被边框遮挡：

  df<-data.frame(x=c("T1", "T2", "T3"), y=c(48, 24, 26))
  ggplot(data=df, aes(x, y))+
    geom_col()+ 
    theme_bw()+
    scale_y_continuous(expand = c(0, 0), limits = c(0, 60), breaks=c(0, 12, 24, 36, 48, 60)) +
    theme(
      axis.ticks.length = unit(-0.25, "lines"), # 刻度线向内缩进
      axis.text.y = element_text(margin = margin(r = 5)) # 调整Y轴文本右侧边距
    )
  

• 改用coord_cartesian()设置坐标轴范围
  替换scale_y_continuous()中的limits参数为coord_cartesian()，它是对现有绘图区域裁剪而非重新定义轴范围，能避免刻度线错位：

  df<-data.frame(x=c("T1", "T2", "T3"), y=c(48, 24, 26))
  ggplot(data=df, aes(x, y))+
    geom_col()+ 
    theme_bw()+
    scale_y_continuous(expand = c(0, 0), breaks=c(0, 12, 24, 36, 48, 60)) +
    coord_cartesian(ylim = c(0, 60))
  

• 优化图片保存参数
  保存png时提高dpi数值，同时设置合适的尺寸，能缓解显示层面的错位问题：

  ggsave("your_plot.png", dpi=300, width=6, height=4)
  

内容的提问来源于stack exchange，提问作者Meerkat