Re: I'm puzzled by drastic truncation of y-axis in DateListLogPlot
- To: mathgroup at smc.vnet.net
- Subject: [mg115402] 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:37 -0500 (EST)
I tried PlotRange->All, and it made no difference. (Version 8.)
Bobby
On Sun, 09 Jan 2011 01:16:44 -0600, Syd Geraghty <sydgeraghty at me.com>
wrote:
> Hi James,
>
> Its not you ....
>
>
> Just add PlotRange->All
>
> to the options of DateListLogPlot and all will be well.
>
> Its a bug / Feature that should be reported.
>
>
> Cheers .... Syd
>
> Syd Geraghty B.Sc, M.Sc.
>
> sydgeraghty at mac.com
>
> Mathematica 8.0 for Mac OS X x86 (64-bit) (November 6, 2010)
> MacOS X V 10.6.5 Snow Leopard
> MacBook Pro 2.33 GHz Intel Core 2 Duo 2GB RAM
>
> On Jan 7, 2011, at 1: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}]
>>
>
>
--
DrMajorBob at yahoo.com