是否可以在基本图形中将轴标签分成2行?

Edu*_*oni 5 graphics r

我试图让x轴标签分成两行.我还希望标签旋转45度.我怎样才能做到这一点?

到目前为止我所拥有的:

N <- 10
dnow <- data.frame(x=1:N, y=runif(N), labels=paste("This is observation ",1:N))
with(dnow, plot(x,y, xaxt="n", xlab=""))
atn <- seq(1,N,3)
axis(1, at=atn, labels=labels[atn])
Run Code Online (Sandbox Code Playgroud)

Chr*_*ois 12

这是ggplot2包装的一种可能性.

N <- 10
labs <- factor(1:N,labels=paste("This is \n observation",1:N))
dnow <- data.frame(x=1:N, y=runif(N), labels=labs)
qplot(labels,y,data=dnow) + 
      opts(axis.text.x=theme_text(angle=-45,hjust=0))
Run Code Online (Sandbox Code Playgroud)

替代文字http://i28.tinypic.com/k024p3.png

我也很期待看到基础包的例子!