Re: Rotate Dateticks in DateListPlot

• To: mathgroup at smc.vnet.net
• Subject: [mg131542] Re: Rotate Dateticks in DateListPlot
• From: Gregory Lypny <gregory.lypny at videotron.ca>
• Date: Fri, 23 Aug 2013 05:30:33 -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>

```Thanks Bob,

Brilliant as usual!

Gregory

On Thu, Aug 22, 2013, at 9:41 AM, Bob Hanlon <hanlonr357 at gmail.com> wrote:

> 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

```

• Prev by Date: Converting MeijerG to Special Function like ln(x+1) in Mathematica?
• Next by Date: Re: Rotate Dateticks in DateListPlot
• Previous by thread: Re: Rotate Dateticks in DateListPlot
• Next by thread: Re: Rotate Dateticks in DateListPlot