从 x 轴向下移动 x 轴标签

【问题标题】：Move x-axis labels down from x-axis从 x 轴向下移动 x 轴标签
【发布时间】：2014-01-24 20:30:42
【问题描述】：

x<- structure(list(count = c(4259120, 4317840, 4444000, 4254240, 
4656800), the_date = structure(c(1389589200, 1389675600, 1389762000, 
1389848400, 1389934800), class = c("POSIXct", "POSIXt"), tzone = "")), .Names =     c("count", 
"the_date"), row.names = c(51L, 406L, 664L, 197L, 196L), class = "data.frame")

par(mar = c(8, 4, 4, 2) + 0.1)
plot(x$the_date, x$count, type="l", xaxt = "n",  xlab = "")
axis(1, labels = FALSE)
labels<-x$the_date
labels<-format(labels, format="%b-%d-%Y") 
text(x$the_date, par("usr")[3] - 0.75, srt = 55, adj = 1, labels = labels, xpd = TRUE)

我尝试按照here 的指定调整par("usr")[3] - 0.75 偏移量，但标签根本没有移动。

【问题讨论】：

标签： r plot label

【解决方案1】：

您可以使用 2 次调用 axis 函数来实现这样的技巧。我在这里使用axis.Date，因为您处理日期（更适合格式化）。然后你可以使用line 参数来处理标签位置。

axis(1,labels=FALSE)
axis.Date(1,at = x$the_date,las=2, format= "%m-%d",line=0.5,tick=FALSE)

【讨论】：

有什么方法可以让它们旋转一定角度而不是 90 度？
@tcash21 最好转移到更高的绘图库..如ggplot2 或lattice。
是的，我想通了。为此，我将返回ggplot2。谢谢！