时间序列的加法模型的具体实现问题

在R里通过decompose就可以对ts的数据进行包含trend, seasonal, random的三个components的时序分析。但要如何加入自造的第四个component呢？

谢谢！