R语言提取时间序列的周期性成分应用EMD，小波滤波器，Baxter过滤器等