Problem with DateListPlot
- To: mathgroup at smc.vnet.net
- Subject: [mg129447] Problem with DateListPlot
- From: Luke Gower <lgower at kpmg.com.au>
- Date: Mon, 14 Jan 2013 23:29:24 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-newout@smc.vnet.net
- Delivered-to: mathgroup-newsend@smc.vnet.net
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
- Follow-Ups:
- Re: Problem with DateListPlot
- From: Bob Hanlon <hanlonr357@gmail.com>
- Re: Problem with DateListPlot