时间戳

首页 > 解决方案 > 在我的时间序列图中添加第二行时遇到问题

r - 在我的时间序列图中添加第二行时遇到问题

问题描述

我有一个由 3 列（ 、 和 ）组成的数据集dates，unemployment rate我seasonally adjusted unemployment rate试图在时间序列图中绘制它。但是，我只能让它为unemployment rateor工作seasonally adjusted unemployment rate，并且无法同时在同一个情节上获得两者。

我试图使用不同的方法，例如 ggplot 和 plot 从 SO 上找到的答案，但是我没有成功。

到目前为止，这是我的代码，其中 plot data 表示存储我的数据的数据框。

pd <- plotdata
Pd <- ts(pd[,2], frequency = 12, start = 2000)
plot(as.xts(Pd), type="l", col="red", major.format = "%b-%y", ylab="Unemployment Rate",
     main= "Unemployment Rate over Time")
lines(ts(pd[,3]), type = "l", col = "blue")

预期结果将是一个有 2 条线的图表。但是，“行”似乎没有添加额外的行，如果我尝试使用 pd 而不是 pd[,2] 或 pd[,3] 生成时间序列，它会造成一团糟，看起来与我正在寻找的完全不同为了。谢谢

我的失业图表

标签： r

解决方案

您的问题需要更多细节。你的专栏叫什么名字？

使用 ggplot，以下是绘制系列的方法：

library(zoo)
library(ggplot2)

pd$Date <- as.Date(as.yearmon(as.character(pd$Date))

ggplot(data = pd, mapping = aes(x = Date)) +
   geom_line(aes(y = Actual)) +
   geom_line(aes(y = Adjusted))

推荐阅读