[R] abline with zoo series

[Gabor Grothendieck]

Recessions are typically shown by shading.  The zoo package has
xblocks for this purpose.  If app1 is your zoo object then:

plot(app1)
tt <- time(app1)
xblocks(tt, tt >= "1990-07-01" & tt <= "1991-03-31",
   col = rgb(0.7, 0.7, 0.7, 0.5)) # transparent grey

See ?xblocks for more info.



On Thu, Nov 24, 2016 at 10:03 PM, Erin Hodgess <erinm.hodgess at gmail.com> wrote:
> Hello!  Happy Thanksgiving to those who are celebrating.
>
> I have a zoo series that I am plotting, and I would like to have some
> vertical lines at certain points, to indicate US business cycles.  Here is
> an example:
>
> app1 <- get.hist.quote(instrument="appl",
> start="1985-01-01",end="2016-08-31", quote="AdjClose", compression="m")
> #Fine
> plot(app1,main="Historical Stock Prices: Apple Corporation")
> #Still Fine
> #Now I want to use abline at July 1990 and March 1991 (as a start) for
> business cycles.  I tried v=67 and v="1990-07", no good.
>
> I have a feeling that it's really simple and I'm just not seeing it.
>
> Any help much appreciated.
>
> Thanks,
> Erin
>
>
> --
> Erin Hodgess
> Associate Professor
> Department of Mathematical and Statistics
> University of Houston - Downtown
> mailto: erinm.hodgess at gmail.com
>
>         [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.



-- 
Statistics & Software Consulting
GKX Group, GKX Associates Inc.
tel: 1-877-GKX-GROUP
email: ggrothendieck at gmail.com