ここで足りないものがよくわかりませんが、基本的に時系列の補間値を計算しようとしています。シリーズを直接プロットして、 "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()関数を実行して補間点を取得するのと同じ方法で実行する必要はありませんか。
回答:
回答№1は0補間には、 約。 例:
inter <- approx(date.vector, fact.vector, xout=interpolation.date.vector)
inter$x # holds x interpolated values, basically interpolation.date.vector
inter$y # holds y interpolated values
欠点は、線形補間または定数補間のどちらかを実行することです。