我有MLB工资，我试图绘制频率分布以显示图形的偏度。我在制作直方图的x轴标签时遇到问题。顺便说一句，我从here获得了MLB薪资数据。
以下是我制作发行版的方式：
hist(data, breaks = 33, axes = F)
鉴于我的工资范围从0到3500万美元，我生成了这样的标签 -
x.axis <- pretty(seq(0,35000000, by = 10000000))/10000000
x.axis
>[1] 0.0 0.5 1.0 1.5 2.0 2.5 3.0
使用axis（）函数仅绘制前8个标签。
axis(1, at = y, labels = paste(y, "M", sep =""))
我意识到这是因为length(x.axis) = 8。
有没有办法间隔x轴上的刻度？
提前致谢！
答案 0 :(得分：0)
想出来！
pts <- pretty(data/10000000)
a <- (seq(0,35000000, by = 5000000))
axis(1, at = a, labels = paste(pts, "M", sep =""))