r - 在R中的同一图上绘制不连续的xts时间序列？

Question

我希望能够在 R 的同一屏幕上绘制几个不连续时间序列的线图，并且无法同时显示所有数据：

require(xts)
require(xtsExtra)
df1=data.frame(a=1:30,b=3*1:30)
df1$b[2*1:15]=NA
df1A_xts=xts(df1,ISOdate(1900+1:30,1,1))
df1B_xts=xts(df1,ISOdate(1900+2*1:30,2,1))
df1_xts_merge=merge.xts(df1A_xts,df1B_xts)

当然，当我绘制为点图时，一切正常：

plot.xts(df1_xts_merge,screens=1,type="p",auto.legend=TRUE)

但是当我尝试将一个或多个系列绘制为线条时，不连续性会引起麻烦，例如：

plot.xts(df1_xts_merge,screens=1,auto.legend=TRUE)

如何将这些系列中的每一个绘制为同一组轴上的连续线？

Answer 1

xts 和 zoo 的行为与默认绘图方法一致：

matplot(df1_xts_merge,type="l")

您似乎想要通过 xts 对象中的点插值的线图，在这种情况下na.approxorna.spline会有所帮助：

plot(na.approx(df1_xts_merge),screens=1,auto.legend=TRUE)