我想像这样绘制一个简单的条形图:
test <- data.frame(y=c(1,3,53,10,30,35,50), x=c(1:7))
barplot(test$y, names.arg=test$x)
我的问题是，如果最大值是某个“不漂亮”的数字，则 y 轴不会延伸得足够远。如果轴延伸超过最大值并以大于最大值的某个“漂亮”值结束，那会更好。
给定一个随机数据集(即这是一个函数)，是否有一种简单的方法可以做到这一点？
最佳答案
您可以结合使用 pretty() 和 range() 自动为 ylim 选择更好的设置:
test <- data.frame(y=c(1,3,53,10,30,35,50), x=c(1:7))
barplot(test$y, names.arg=test$x,
ylim = range(pretty(c(0, test$y))))
(感谢 Gavin Simpson 指出 range(pretty(c(0, test$y))) 与 range(pretty(c(0, max) (测试$y))))
关于r - 带有最小和最大标签的漂亮轴，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/10803160/