轴/条形图和历史的圆形最大值答案

【问题标题】：Round max of the axis / barplot and hist轴/条形图和历史的圆形最大值
【发布时间】：2015-01-07 07:25:30
【问题描述】：

我有大量的图表要生成，我想要一个自动化的脚本来生成其中的大部分。

我使用 barplot 并在 R 中点击。使用图形参数breaks，xaxp/yaxp 和xlim/ylim，我想有自动值：

对于休息：我希望休息以每 100 次划分 X 轴（一个用于 0-100，另一个用于 100-200，等等）
xaxp 和 ylim：我希望将最大值舍入到接下来的数百个，并且轴每 100 个标记一个标签和刻度。
xlim/ylim：我正在搜索如何在接下来的 5 个倍数处舍入最大值，并且我希望每 5 个有标签和刻度。

编辑：我找到了解决方案：

ry<-round(max(g4$density),digit=-1)
ry
t<-pretty((table$col1), max(table$col1)/500)
t
plot(g4,freq=F, axe=F, col=c("gray"), main="", xlab=NA , ylab=NA, ylim=c(0,ry),xlim=c(0,max(t)))
plot(g4,freq=F, axe=F, col=c("gray"), main="", xlab=NA , ylab=NA, ylim=c(0,ry),xlim=c(0,max(t)))
axis(1,xaxp=c(0,max(t),max(t)/500), line=-0.7, xlim=c(0,t))
axis(2,yaxp=c(0,ry,ry/5), line=-0.9, las=2)

【问题讨论】：

我编辑我的第一个。它现在正在工作

标签： r bar-chart

【解决方案1】：

我找到了答案：

ry<-round(max(g4$density),digit=-1) ry 
t<-pretty((table$col1), max(table$col1)/500) 
t 
plot(g4,freq=F, axe=F, col=c("gray"), main="", xlab=NA , ylab=NA, ylim=c(0,ry),xlim=c(0,max(t)))

plot(g4,freq=F, axe=F, col=c("gray"), main="", xlab=NA , ylab=NA, ylim=c(0,ry),xlim=c(0,max(t))) 

axis(1,xaxp=c(0,max(t),max(t)/500), line=-0.7, xlim=c(0,t)) 
axis(2,yaxp=c(0,ry,ry/5), line=-0.9, las=2)

【讨论】：