mFilter: Miscellaneous Time Series Filters

unemp <- structure(c(5.83333333333, 5.1, 5.26666666667, 5.6, 5.13333333333, 
5.23333333333, 5.53333333333, 6.26666666667, 6.8, 7, 6.76666666667, 
6.2, 5.63333333333, 5.53333333333, 5.56666666667, 5.53333333333, 
5.76666666667, 5.73333333333, 5.5, 5.56666666667, 5.46666666667, 
5.2, 5, 4.96666666667, 4.9, 4.66666666667, 4.36666666667, 4.1, 
3.86666666667, 3.83333333333, 3.76666666667, 3.7, 3.83333333333, 
3.83333333333, 3.8, 3.9, 3.73333333333, 3.56666666667, 3.53333333333, 
3.4, 3.4, 3.43333333333, 3.56666666667, 3.56666666667, 4.16666666667, 
4.76666666667, 5.16666666667, 5.83333333333, 5.93333333333, 5.9, 
6.03333333333, 5.93333333333, 5.76666666667, 5.7, 5.56666666667, 
5.36666666667, 4.93333333333, 4.93333333333, 4.8, 4.76666666667, 
5.13333333333, 5.2, 5.63333333333, 6.6, 8.26666666667, 8.86666666667, 
8.46666666667, 8.3, 7.73333333333, 7.56666666667, 7.73333333333, 
7.76666666667, 7.5, 7.13333333333, 6.9, 6.66666666667, 6.33333333333, 
6, 6.03333333333, 5.9, 5.86666666667, 5.7, 5.86666666667, 5.96666666667, 
6.3, 7.33333333333, 7.66666666667, 7.4, 7.43333333333, 7.4, 7.4, 
8.23333333333, 8.83333333333, 9.43333333333, 9.9, 10.66666666667, 
10.36666666667, 10.13333333333, 9.36666666667, 8.53333333333, 
7.86666666667, 7.43333333333, 7.43333333333, 7.3, 7.23333333333, 
7.3, 7.2, 7.03333333333, 7.03333333333, 7.16666666667, 6.96666666667, 
6.83333333333, 6.6, 6.26666666667, 6, 5.83333333333, 5.7, 5.46666666667, 
5.46666666667, 5.33333333333, 5.2, 5.23333333333, 5.23333333333, 
5.36666666667, 5.3, 5.33333333333, 5.7, 6.13333333333, 6.6, 6.83333333333, 
6.86666666667, 7.1, 7.36666666667, 7.6, 7.63333333333, 7.36666666667, 
7.13333333333, 7.06666666667, 6.8, 6.63333333333, 6.56666666667, 
6.2, 6, 5.63333333333, 5.46666666667, 5.66666666667, 5.66666666667, 
5.56666666667, 5.53333333333, 5.5, 5.26666666667, 5.33333333333, 
5.26666666667, 5, 4.86666666667, 4.66666666667, 4.66666666667, 
4.43333333333, 4.5, 4.43333333333, 4.3, 4.3, 4.23333333333, 4.1, 
4.03333333333, 4.03333333333, 4, 3.96666666667), .Tsp = c(1959, 
2000.75, 4), class = "ts")