MathGroup Archive 2013

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Rotate Dateticks in DateListPlot

  • To: mathgroup at smc.vnet.net
  • Subject: [mg131543] Re: Rotate Dateticks in DateListPlot
  • From: Bob Hanlon <hanlonr357 at gmail.com>
  • Date: Fri, 23 Aug 2013 05:30:54 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • Delivered-to: l-mathgroup@wolfram.com
  • Delivered-to: mathgroup-outx@smc.vnet.net
  • Delivered-to: mathgroup-newsendx@smc.vnet.net
  • References: <20130822045203.56DDD6A19@smc.vnet.net>

data = {{{2006, 10, 1}, 10}, {{2006, 10, 15}, 12},
   {{2006, 10, 30}, 15}, {{2006, 11, 20}, 20}};


dlp = DateListPlot[data,
  Epilog -> (Text[
       ToString[{#[[1, 3]], #[[2]]}],
       #, 5/4*Sign[DateDifference[
           {2006, 11, 1}, #[[1]]]*
          {1, 1}]] & /@ data)]


Rotate all strings:


Show[dlp /. str_String :>
   Rotate[str, 90 Degree]]


Rotate just Frame date labels:


Show[dlp /. {v_, str_String} :>
   {v, Rotate[str, 90 Degree]}]



Bob Hanlon




On Thu, Aug 22, 2013 at 12:52 AM, Gregory Lypny
<gregory.lypny at videotron.ca>wrote:

> Hi everyone,
>
> Bob Hanlon posted a neat way of rotating the frame ticks (date markers) on
> a date list plot.
>
> data = {{{2006, 10, 1}, 10}, {{2006, 10, 15}, 12}, {{2006, 10, 30},
>     15}, {{2006, 11, 20}, 20}};
>
> Show[DateListPlot[data] /.
>   str_String :> Rotate[str, 90 Degree]]
>
> It works like a charm as long as their are no other string annotations in
> the plot; otherwise, those other annotations will be rotated too.  Is there
> a way to rotate only the frame ticks?
>
> Regards,
>
> Gregory
>
>
>
>



  • Prev by Date: Re: Rotate Dateticks in DateListPlot
  • Next by Date: Re: parametric plot and filling
  • Previous by thread: Re: Rotate Dateticks in DateListPlot
  • Next by thread: Re: Connecting to remote kernel