[Xts-commits] r683 - in pkg/xtsExtra: . man

[noreply at r-forge.r-project.org]

Author: weylandt
Date: 2012-07-17 21:16:52 +0200 (Tue, 17 Jul 2012)
New Revision: 683

Modified:
   pkg/xtsExtra/TODO
   pkg/xtsExtra/man/plot.xts.Rd
Log:
Added color blocks examples to plot.xts.Rd

Modified: pkg/xtsExtra/TODO
===================================================================
--- pkg/xtsExtra/TODO	2012-07-17 03:26:23 UTC (rev 682)
+++ pkg/xtsExtra/TODO	2012-07-17 19:16:52 UTC (rev 683)
@@ -4,7 +4,7 @@
   -- Most everything
   
 ANALYTICS
-  -- 
+  -- regularize()
   
 GRAPHICS
   -- plot.xts
@@ -23,4 +23,4 @@
     -- Long term: 
         Do layout with layout so we can move back and forth among screens?
         Write demo or vignette
-  -- barplot.xts
\ No newline at end of file
+  -- barplot.xts

Modified: pkg/xtsExtra/man/plot.xts.Rd
===================================================================
--- pkg/xtsExtra/man/plot.xts.Rd	2012-07-17 03:26:23 UTC (rev 682)
+++ pkg/xtsExtra/man/plot.xts.Rd	2012-07-17 19:16:52 UTC (rev 683)
@@ -115,8 +115,12 @@
 plot(merge(x,x), type = "p", col = list(1:5, 1:3), pch = list(1:5, 1:3), cex = list(1:5, 1:3))
 
 # Using the events argument
-plot(sample_xts[,1], events = list(time = c("2007-03-15", "2007-05-01"), label = "bad day"))
+plot(sample_xts[,1], events = list(time = c("2007-03-15", "2007-05-01"), label = "bad days"))
 
+plot(sample_xts[,1], events = list(time = c("2007-03-15","2007-05-01"), label = "bad days"), blocks = list(start.time = c("2007-03-05", "2007-04-15"), end.time = c("2007-03-20","2007-05-30"), col = c("lightblue", "lightgreen")))
+
+plot(sample_xts, layout.screens = matrix(c(1,1,2,3,4,4), ncol = 2, byrow = TRUE), events = list(time = c("2007-03-15","2007-05-01"), label = "bad days"), blocks = list(start.time = c("2007-03-05", "2007-04-15"), end.time = c("2007-03-20","2007-05-30"), col = c("lightblue", "lightgreen")))
+
 # Makes a scatterplot if we pass two series
 plot(sample_xts[,1],sample_xts[,2])