dax <-
structure(c(6835.6, 7644.55, 7599.39, 7414.68, 7109.67, 6898.21, 
7190.37, 7216.45, 6798.12, 7077.44, 6372.33, 6433.61, 6795.14, 
6208.24, 5829.95, 6264.51, 6123.26, 6058.38, 5861.19, 5188.17, 
4308.15, 4559.13, 4989.91, 5160.1, 5107.61, 5039.08, 5397.29, 
5041.2, 4818.3, 4382.56, 3700.14, 3712.94, 2769.03, 3152.85, 
3320.32, 2892.63, 2747.83, 2547.05, 2423.87, 2942.04, 2982.68, 
3220.58, 3487.86, 3484.58, 3256.78, 3655.99, 3745.95, 3965.16, 
4058.6, 4018.16, 3856.7, 3985.21, 3921.41, 4052.73, 3895.61, 
3785.21, 3892.9, 3960.25, 4126, 4256.08, 4254.85, 4350.49, 4348.77, 
4184.84, 4460.63, 4586.28, 4886.5, 4829.69, 5044.12, 4929.07, 
5193.4, 5408.26, 5674.15, 5796.04, 5970.08, 6009.89, 5692.86, 
5683.31, 5681.97, 5859.57, 6004.33, 6268.92, 6309.19, 6596.92, 
6789.11, 6715.44, 6917.03, 7408.87, 7883.04, 8007.32, 7584.14, 
7638.17, 7861.51, 8019.22, 7870.52, 8067.32, 6851.75, 6748.13, 
6534.97, 6948.82, 7096.79, 6418.32, 6479.56, 6422.3, 5831.02, 
4987.97, 4669.44, 4810.2, 4338.35, 3843.74, 4084.76, 4769.45, 
4940.82, 4808.64, 5332.14, 5464.61, 5675.16, 5414.96, 5625.95, 
5957.43), .Tsp = c(2000, 2009.91666666667, 12), class = "ts")