R 用3条曲线时间序列数据绘制图形
我有一个相当基本的问题,但我找不到答案。 我想创建一个带有三条曲线(时间序列数据)的图,而不使用ts.plot。 以下是三组数据:R 用3条曲线时间序列数据绘制图形,r,plot,time-series,R,Plot,Time Series,我有一个相当基本的问题,但我找不到答案。 我想创建一个带有三条曲线(时间序列数据)的图,而不使用ts.plot。 以下是三组数据: a1 <- seq(as.Date("2001-01-01"),as.Date("2021-01-01"),"years") a2 <- rnorm(21,10,1) Dollar <- data.frame(a1,a2) dates <- as.Date(Dollar[,1], "%d.%m.%Y",tz="GMT") xtsplot1
a1 <- seq(as.Date("2001-01-01"),as.Date("2021-01-01"),"years")
a2 <- rnorm(21,10,1)
Dollar <- data.frame(a1,a2)
dates <- as.Date(Dollar[,1], "%d.%m.%Y",tz="GMT")
xtsplot1 <- as.xts(Dollar[,2], dates)
b1 <- seq(as.Date("2001-01-01"),as.Date("2021-01-01"),"years")
b2 <- rnorm(21,10,1)
EURO <- data.frame(b1,b2)
xtsplot2 <- as.xts(EURO[,2], dates)
c1 <- seq(as.Date("2001-01-01"),as.Date("2021-01-01"),"years")
c2 <- rnorm(21,10,1)
YEN <- data.frame(c1,c2)
xtsplot3 <- as.xts(Dollar[,2], dates)
但它不起作用
有什么建议吗?:) 您可以使用matplot,如下所示:
matplot(cbind(xtsplot1, xtsplot2, xtsplot3), xaxt = "n", xlab = "Time", ylab = "Value", col = 1:3, ann = FALSE, type = 'l')
另外,您的代码中有一个输入错误:在创建第三个xts对象时,我想您的意思是将“日元”放在“美元”的位置,这正是我要找的!谢谢但是,如果我现在想添加一个x轴,则可以使用逗号:
d1y绘制一个时间序列,然后使用行
函数添加另外两个时间序列。缺点是y边界框由第一个时间序列确定。Frank DiTraglia提出的matplot
解决了这个问题,在语法上与您想要的最接近。有关单个绘图上任意数量的时间序列,请参阅ggplot2
package。
matplot(cbind(xtsplot1, xtsplot2, xtsplot3), xaxt = "n", xlab = "Time", ylab = "Value", col = 1:3, ann = FALSE, type = 'l')