Displaying 1 result from an estimated 1 matches for "asia1".
Did you mean:
asia
2008 Nov 04
2
ggplot & annotating charts
...="d-mon-y")
vix.ar1.z <- zoo(vix.ar1[,-1],vix.ar1$dates)
vix.close2<-aggregate(vix.ar1.z[,4],as.yearmon,max)
vix.close<-rbind(vix.close1,vix.close2)
op <- par(mar = c(6, 8, 6, 6) + 0.1)
gulf1 <- as.yearmon("1990-8-2")
gulf2 <- as.yearmon("1991-2-28")
asia1 <- as.yearmon("1997-9-11")
asia2 <- as.yearmon("1998-11-14")
sep1 <- as.yearmon("2001-9-11")
sep2 <- as.yearmon("2002-9-14")
crunch1 <- as.yearmon("2007-8-9")
crunch2 <- as.yearmon("2009-11-14")
plot(vix.close, type = &qu...