時間序列圖或不同的時間間隔

Question

我想在r中畫點：

k<-c(540, 535, 545, 538, 530, 550, 544, 548)
m<-c(545, 536, 547, 540, 543)

對於k我想在X軸上具有從時間1到8的點（點之間X軸上的tim之間的差異相同）

plot(k, lwd=2,col="blue",xlab="Time",ylab="Values",pch=16,type="b")

但m我想有不同的時間點。 例如，在具有另一種顏色（紅色）的最后一個繪圖上的x軸時間（1,2,5,7,8）上。 我怎樣才能做到這一點？

非常感謝

Answer 1

可以使用par(new = TRUE) ，類似

plot(k, lwd=2,col="blue",xlab="",ylab="",pch=16,type="b")
par(new = TRUE)
plot(c(1,2,5,7,8), m, col="red",xlab="Time",ylab="Values",pch=16,type="b", yaxt = 'n')

也可以只使用lines代替

plot(k, lwd=2,col="blue",xlab="Time",ylab="Values",pch=16,type="b")
lines(c(1,2,5,7,8), m, col="red",pch=16, type="b")