r中采用arima函数拟合时间序列，现在想将原序列和预测值画在一张图中，用arima.forecast发现只能画出预测的几个点，画不出之前的拟合点，请问怎么能画在一张图中？