我不确定这里遗漏了什么,但我基本上是在计算时间序列的插值;当我直接绘制序列时,用“interpolation.date.vector”约束插值点,该图是正确的:
plot(date.vector,fact.vector,ylab='Quantity')
lines(spline(date.vector,fact.vector,xout=interpolation.date.vector))
当我计算插值时,将其存储在一个中间变量中,然后绘制结果;我得到一个完全错误的结果:
intepolated.values <- spline(date.vector,fact.vector,xout=interpolation.date.vector)
plot(intepolated.values$x,intepolated.values$y)
lines(intepolated.values$x,intepolated.values$y)
lines()函数不需要执行spline()函数来检索插值点吗?