我试图让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
我也很期待看到基础包的例子!