R语言如何把2个不同时间的数据准确的画在一个图上

追梦赤子心Kevin

3355

收藏 2016-07-14

plot(IF[,13],IF[,2],ylim=c(1000,12000),type="l",main="IF,IC", xlab="Time",ylab="Open Price")
lines(IC[,13],IC[,2],type="l",col="red")

> head(IC[,13])
[1] 2015-04-16 2015-04-17 2015-04-20 2015-04-21 2015-04-22 2015-04-23
304 Levels: 2015-04-16 2015-04-17 2015-04-20 2015-04-21 ... 2016-07-11

大家好，可以从上面图片看出。红色的IC数据显示是从2013年开始画的。但是其实IC的数据应该是从2015年开始画，然后画到2016年7月。感觉R不能识别的日期的样子。请问大神们，有什么方法解决这个问题吗？让IC红线从2015年开始画

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

全部回复

xuruilong100

2016-7-15 09:11:02

# 引入 xts 包
library(xts)
# 把数据转成xts格式
ICts <- xts(...)
IFts <- xts(...)
# 画图
plot(IFts)
lines(ICts)

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

追梦赤子心Kevin

2016-7-15 09:58:42

xuruilong100 发表于 2016-7-15 09:11
# 引入 xts 包
library(xts)
# 把数据转成xts格式

谢谢回答，但是还是有一点小问题呀。。。
> head(CSI905[,1])
[1] 2013/5/6 2013/5/7 2013/5/8 2013/5/9 2013/5/10 2013/5/13
778 Levels: 2013/10/10 2013/10/11 2013/10/14 2013/10/15 ... 2016/7/8
> library(xts)
> ICts <- xts(CSI905[,1])
Error in xts(CSI905[, 1]) :
order.by requires an appropriate time-based object
>

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

xuruilong100

2016-7-16 21:20:27

追梦赤子心Kevin 发表于 2016-7-15 09:58
谢谢回答，但是还是有一点小问题呀。。。
> head(CSI905[,1])
[1] 2013/5/6 2013/5/7 2013/5/8 201 ...

需要提供order.by变量，也就是表示时间的变量

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群