如何格式化 R 中的轴、年份和月份

Question

我有以下数据集

1890 mar 0.4
1890 apr 0.8
1890 may 1.0
...
1989 jan 0.2
1989 feb 0.4
1989 mar 0.5

如何在 R 中绘制线图，并在 x 轴上绘制年，每 5 年显示一次？

我的问题不在于制作情节，而是只显示我想要的年份，并将它们放在那一年的年初。所以我不想在四月勾选，而是在一月勾选。

Answer 1

这应该可以帮助您开始：

# create some data
set.seed(1)
tmp <- seq(as.POSIXct("1890-03-01", tz="GMT"),
           as.POSIXct("1920-03-01", tz="GMT"),
           by="month")
df <- data.frame(date=tmp,
                 val=rnorm(length(tmp)))

# plot data
plot(df$date, df$val, xaxt="n")
tickpos <- seq(as.POSIXct("1890-01-01", tz="GMT"),
               as.POSIXct("1920-01-01", tz="GMT"),
               by="5 years")
axis.POSIXct(side=1, at=tickpos)

Answer 2

默认情况下，使用 zoo 作为绘图，您会得到 rcs （正确！）建议的内容线和同一轴：

R> library(zoo)
R> zdf <- zoo(df$val, order.by=df$date)
R> plot(zdf)
R> 

help(plot.zoo) 示例展示了如何进行更奇特的日期索引，本质上是 rcs 向您展示的内容，但通过附加格式，例如，

R> fmt <- "%Y-%m"  ## year-mon
R> txt <- format(index(zdf), fmt)
R> plot(zdf, xaxt='n')
R> axis(side=1, at=index(zdf), lab=txt)
R> 

如果您将 at< /code> 和 lab 你得到的蜱虫也更少。