在图表上绘制多条线 - 第二条线不起作用

Question

我想弄清楚为什么在我的折线图上绘制第二行不起作用。

我的数据集看起来像这样：

Time<- c("2011-10-16 09:33","2011-10-16 09:54")
Y1<-c("50259", "41090")
Y2<-c("9823", "98723")

当我绘制

时

plot(Time,Y1,type="l",col="red")

图表看起来很好。但后来我添加了

lines(Time,Y2,col="green")

并且没有在图表上注册。任何人都知道为什么？

Answer 1

我使用以下代码使其工作。不确定这是不是你想要的：

Time<- as.POSIXct(c("2011-10-16 09:33","2011-10-16 09:54") )
Y1<-c("50259", "41090") 
Y2<-c("9823", "98723") 

plot(Time,as.numeric(Y1),type="l",col="red", ylim=c(9800, 98800))
abline(lm(as.numeric(Y2)~Time),col="green")