Hi Sean,
Thanks for your reply, but the intention is simular as this proposal and seems not to work with the fitPlot line:
Module[{dates, vals1, vals2, data1, data2, data3},
dates = Table[{2012, k, 1}, {k, 12}];
vals1 = {1, 2, 3, 4, 5, 6, 6, 5, 4, 3, 2, 1};
vals2 = {4, 4, 4, 4, 4, 4, 3, 3, 3, 3, 3, 3};
data1 = Transpose[{dates, vals1}];
data2 = Transpose[{dates, vals2}];
DateListPlot[{data1, data2}, ImageSize -> {150, 93}, Axes -> True,
AxesOrigin -> {AbsoluteTime[data1[[1, 1]]], 0},
Filling -> {1 -> {{2}, {Red, Darker[Green]}}}, PlotRange -> Full] //
Print;]
Can you help?
Thanks,....Jos
