在R中延长绘图轴的长度?

时间:2011-01-04 20:43:56

标签: r plot

如何扩展R中的轴线以覆盖数据范围?例如,在

http://i.stack.imgur.com/xUvp3.png

我的数据大约到2100年,我希望x轴的线走得那么远,但是不要在2100处做一个刻度线或标签。这在R中是否可能?

以下是用于制作上述情节的代码:

hist(x,breaks=50,xlab="...",main="",xlim=c(0,2100))

感谢。

3 个答案:

答案 0 :(得分:10)

您需要使用两个轴命令;一个用于轴线,另一个用于刻度线和标签。

set.seed(2); x <- rlnorm(1000, log(130))
hist(x, breaks=seq(0, 3000, by=200), xlim=c(0,2100), xaxt="n")

axis(1, at=c(0,2100), labels=c("",""), lwd.ticks=0)
axis(1, at=seq(0 , 2000, by=200), lwd=0, lwd.ticks=1)

alt text

答案 1 :(得分:3)

作为着名的引语

R> fortunes::fortune("yoda")

Evelyn Hall: I would like to know how (if) I can extract some of
the information from the summary of my nlme.
Simon Blomberg: This is R. There is no if. Only how.
   -- Evelyn Hall and Simon 'Yoda' Blomberg
      R-help (April 2005)
R>

说“没有if。只有如何。”。

您可以通过

设置所需的任何轴标签
  • 取消默认轴标签和
  • 设置所需的轴标签。

help(axis)

开始

答案 2 :(得分:3)

使用hist(),您可以使用轴控制刻度线和标签的位置:

hist( rlnorm(1000, log(130) ), breaks=seq(0, 3000, by=200), xlim=c(0,2100) , axes=FALSE)
axis(1, at=seq(0 , 2000, by=200) 

如果您想查看标记的每200个间隔,您可以使用las参数旋转标签:

axis(1, at=seq(0 , 2000, by=200) , las=2)