在R中旋转坐标轴标签

Question

我需要帮助旋转以下图表的坐标轴标签。目前设置下，由于空间有限，最终标签未显示出来。我知道可以使用文本、srt代码来实现此目的，但当前显示的标签无法旋转（新数字仅在图表中出现）：

Xmin=0-2
Xmax=0+2
plot(x, y, type='n', xlab='x-axis',                               
    col.axis="grey", cex.axis=0.7, tck=-.02, xaxt="n")
x <- c(-2,2)
y <- c(-1,1)
plot(x, y, type='n', xlab='x-axis', col.axis="grey", cex.axis=0.7,       
tck=-.02, xaxt="n")
abline(a=-.6, b=-.2, lty=1, pch=15, lwd=1, col='black') 
abline(a=.03, b=.2, lty=5, pch=15, lwd=1, col='black')
axis(1, at=c(-2, -1, 1.9, 2), labels=c("8.07", "8.976", "11.7",          
"11.9"), tck=.01, cex.axis=0.9, srt=45, col.ticks = "grey")

- user81715

Answer 1

尝试添加 las=2。

axis(1, at=c(-2, -1, 1.9, 2), labels=c("8.07", "8.976", "11.7",          
               "11.9"), tck=.01, cex.axis=0.9, srt=45, col.ticks = "grey", las=2)

- greengrass62

---

工作得非常好！这是一个完全不同的问题，但最后2个点之间的有限空间似乎需要1）增加空间2）减小字体大小或3）可能需要另一种旋转度数（45度？）是否有最明显的解决方案来解决这个问题？ - user81715

我的第一反应是旋转似乎不能让你获得更多的空白区域。你可以尝试使用"text(1,1,"hlp", srt=90)"来欺骗一些东西，但你需要调整数字1的位置以达到你想要的效果。 - greengrass62

srt 在 axis() 中起作用吗？我在测试中没有看到它起作用。所以必须使用 text() 吗？ - user1424739