缩短R条形图中的x轴

Question

我想在条形图中缩短x轴，这样它就不会超过我的数据。我怎样才能做到这一点？

我用at = seq(1, length.out = length(unique(Avagno0 $NugentScore)), by = 0.5)将colmuns之间的间距拉得更近。 这是图表的图片：

非常感谢任何帮助！

Answer 1

如果您想要更窄的绘图窗口，则需要使用par来设置外边距。

narrow.at <- seq(1,length.out=length(unique(OrchardSprays $treatment)), by=0.5)
par(oma=c(1,1,1,5))
stripchart(decrease ~ treatment,
     main = "stripchart(OrchardSprays)",
     vertical = TRUE, log = "y", at=narrow.at, data = OrchardSprays,
     xlim=c(0.5,max(narrow.at)+.5) )