扩展轴以包含R中的所有数据

Question

我觉得这是一个非常基本的问题，但我花了很多时间寻找答案而没有找到答案。所以，如果这个问题在其他地方得到解答，我很乐意被重定向而不是投票。请

无论如何，我的问题是当我在R中绘图时，通常y轴将无法延伸到我的数据末尾。下面是一个示例图形，您可以看到轴最好一直到30而不是20。但是，提交ylim = c（0,30）没有做任何事情我想不到或找到另一个可以解决问题的命令？

这是一个可重复的例子。如果ylim通常有效，那么由于我所做的审美变化，我假设某些事情正在破裂？

set.seed(1)
x<-runif(1:1000, min=1, max=10)
hist(x, breaks=100, main=NA, axes=F, xlab = NA,  ylab = NA)

axis(side = 1, tck= -.01, labels=NA)
axis(side = 2, tck=-.01, labels=NA)
axis(side = 1, lwd=0, line= -.4, cex.axis=1.4)
axis(side = 2, lwd=0, line=-.4, las=1, cex.axis=1.4)
mtext(side = 1, "Percent pathogenic bacteria", line = 2.5, cex=1.8)
mtext(side = 2, "Frequency", line = 2.5, cex=1.8)

Answer 1

使用ylim指定y轴范围：

set.seed(3) 
f <- function(y, ...) 
  hist(y, breaks=20, ...)
ylim <- range(pretty(ceiling(f(y <- rchisq(1000, 3), plot=FALSE)$counts/10)*10))
f(y, ylim=ylim) # versus f(y)