Re: I'm puzzled by drastic truncation of y-axis in DateListLogPlot
- To: mathgroup at smc.vnet.net
- Subject: [mg115401] Re: I'm puzzled by drastic truncation of y-axis in DateListLogPlot
- From: DrMajorBob <btreat1 at austin.rr.com>
- Date: Mon, 10 Jan 2011 02:37:25 -0500 (EST)
Shouldn't PlotRange->All do the same think? (But it doesn't, in this case.)
Bobby
On Sat, 08 Jan 2011 02:39:44 -0600, Darren Glosemeyer
<darreng at wolfram.com> wrote:
> On 1/7/2011 3:13 AM, James Stein wrote:
>> I ran into some curious behavior I can't explain. I have two rather
>> benign
>> lists of numbers, of equal length. When either is plotted alone, all
>> goes as
>> expected; and when they are plotted together, all goes *almost* as
>> expected. Dropping the last two or more values makes the plotting
>> normal,
>> but dropping only one, or none, the y axis extends up only to 5
>> (instead of
>> to 20); and the dropped values are not near the extreme values.
>>
>> If you copy the below into a cell and evaluate it, the gist of what I've
>> said above will, I hope, be clear. Have I done something stupid?
>>
>> (* d is a list of dates; a and b are data; we combine 'd'
>> with a and b to form two lists for DateListLogPlot: *)
>> d={{2007,8,31},{2007,9,28},{2007,10,31},{2007,11,30},{2007,12,31},{2008,1,31},{2008,2,29},{2008,3,31},{2008,4,30},{2008,5,30},{2008,6,30},{2008,7,31},{2008,8,29},{2008,9,30},{2008,10,31},{2008,11,28},{2008,12,31},{2009,1,30},{2009,2,27},{2009,3,31},{2009,4,30},{2009,5,29},{2009,6,30},{2009,7,31},{2009,8,31},{2009,9,30},{2009,10,30},{2009,11,30},{2009,12,31},{2010,1,29},{2010,2,26},{2010,3,31},{2010,4,30},{2010,5,28},{2010,6,30},{2010,7,30},{2010,8,31},{2010,9,30},{2010,10,29},{2010,11,30},{2010,12,31},{2011,1,4}};
>> a={20.78,21.3,18.5,16.11,13.58,10.04,6.74,5.88,7.63,9.32,8.83,7.84,8.04,5.07,2.41,1.94,1.48,1.64,1.82,2.04,2.4,2.88,2.46,2.05,1.74,2.1,1.48,1.81,1.97,1.67,1.79,2.13,2.35,2.52,2.12,2.34,2.23,2.6,2.5,2.38,2.6,2.64};
>> b={1.43,1.45,1.48,1.50,1.52,1.55,1.57,1.59,1.62,1.64,1.67,1.696,1.712,1.75,1.77,1.80,1.83,1.86,1.88,1.91,1.94,1.97,2.00,2.03,2.1,2.10,2.13,2.16,2.20,2.23,2.26,2.30,2.33,2.36,2.40,2.44,2.48,2.52,2.55,2.59,2.63,2.64};
>> a=Transpose[{d,a}];
>> b=Transpose[{d,b}];
>> c={a,b};
>>
>> (* a and b can be plotted alone; but when plotted together
>> we get drastic truncation at the top of the log axis: *)
>> DateListLogPlot[a,Joined->True,PlotLabel->"a alone"]
>> DateListLogPlot[b,Joined->True,PlotLabel->"b alone"]
>> DateListLogPlot[c,Joined->True,PlotLabel->"a and b"]
>>
>> (* the drastic truncation occurs suddenly; if at least two rightmost
>> values
>> are truncated, all is OK: *)
>> x=Length[d];
>> Table[DateListLogPlot[{Take[a,n],Take[b,n]},Joined->True,PlotLabel->ToString[n],ImageSize->Small],{n,x-3,x}]
>>
>
> The plotting functions use heuristics to determine the range of y values
> to plot. The heuristics combine a number of factors and in some cases it
> may be preferable to explicitly set the PlotRange to avoid clipping
> parts of the plot. For instance, in this example
>
> DateListLogPlot[c, Joined -> True, PlotLabel -> "a and b",
> PlotRange -> Through[{Min, Max}[c[[All, All, 2]]]]]
>
> can be used to avoid clipping due to the automatic heuristic.
>
> Darren Glosemeyer
> Wolfram Research
>
--
DrMajorBob at yahoo.com