调整y轴上的刻度数，R中的barplot（）

Question

我需要做一些事情来使y轴上的滴答声更多，如下图所示，但我没有设法做到这一点。 任何帮助将不胜感激！ 到目前为止，我已经输入：

Temp<-table(airquality$Temp)
barplot(Temp, col = "red", border = "blue",xpd = FALSE)

Answer 1

如果只需要刻度线并且没有标签，则可以将axis与seq一起使用，并且labels=FALSE

Temp<-table(airquality$Temp)
barplot(Temp, col = "red", border = "blue",xpd = FALSE)
axis(2,at=seq(range(Temp)[1],range(Temp)[2],by=1),labels=FALSE)