MathGroup Archive 2013

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

Search the Archive

Re: Problem with DateListPlot


Use Sequence

DateListPlot[{x, Sequence @@ z},
 Joined -> Join[{False}, Table[True, {Length[z]}]],
 PlotRange -> {0, 12}]


Bob Hanlon


On Mon, Jan 14, 2013 at 11:29 PM, Luke Gower <lgower at kpmg.com.au> wrote:
> Hi folks. This should be really easy, but it is eluding me. Consider the following points and graphic.
>
> x=List[DateString[DatePlus[#],{"Day","MonthNameShort","YearShort"}],#]&/@Range[10];
> y=ReplacePart[Take[x,{2,-1,2}],{_,-1}->10];
> DateListPlot[{x,y},PlotRange->{0,12}]
>
> The plot consists of one diagonal and one horizontal set of points. My problem is that, in the graphic, I would like to join pairs: y[[1]] and y[[2]]; y[[3]] and y[[4]]. An obvious (if ugly) hack is as follows:
>
> z=Partition[y,2];
> DateListPlot[{x, z[[1]], z[[2]]}, Joined -> Join[{False}, Table[True, {Length[z]}]], PlotRange -> {0, 12}]
>
> Unfortunately, in the real version of this problem, the length of y is variable, so I need a solution in terms of y, which does not involve manually entering parts of z.
>
> And that is where I get stuck.
>
> Any suggestions?
> Many thanks indeed.
> Luke
>



  • Prev by Date: neighborhood operations on image
  • Next by Date: Re: Problem with DateListPlot
  • Previous by thread: Problem with DateListPlot
  • Next by thread: Re: Problem with DateListPlot