[Xts-commits] r718 - in pkg/xtsExtra: . R

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

Author: weylandt
Date: 2012-08-15 06:33:37 +0200 (Wed, 15 Aug 2012)
New Revision: 718

Modified:
   pkg/xtsExtra/.Rbuildignore
   pkg/xtsExtra/R/plot.R
   pkg/xtsExtra/TODO
Log:
Improve auto.legend

Modified: pkg/xtsExtra/.Rbuildignore
===================================================================
--- pkg/xtsExtra/.Rbuildignore	2012-08-15 03:28:19 UTC (rev 717)
+++ pkg/xtsExtra/.Rbuildignore	2012-08-15 04:33:37 UTC (rev 718)
@@ -1,20 +1,20 @@
-R/StructTS.R
-R/acf.R
+R/StructTS\.R
+R/acf\.R
 R/analytics
-R/arima.R
-R/bind.merge.R
+R/arima\.R
+R/bind\.merge\.R
 R/graphics
-R/groupGenerics.R
-R/old.plot.R
-R/simpleS3.xtsdf.R
-R/subset.print.xtsdf.R
+R/groupGenerics\.R
+R/old\.plot\.R
+R/simpleS3.xtsdf\.R
+R/subset\.print\.xtsdf\.R
 R/xtsdf
-R/xtsdf.R
+R/xtsdf\.R
 
-man/HoltWinters.xts.Rd
-man/StructTS.xts.Rd
-man/acf.xts.Rd
-man/arima.xts.Rd
-man/indexClass.Rd
-man/stl.xts.Rd
-man/xtsdf.Rd
+man/HoltWinters\.xts\.Rd
+man/StructTS\.xts\.Rd
+man/acf\.xts\.Rd
+man/arima\.xts\.Rd
+man/indexClass\.Rd
+man/stl\.xts\.Rd
+man/xtsdf\.Rd

Modified: pkg/xtsExtra/R/plot.R
===================================================================
--- pkg/xtsExtra/R/plot.R	2012-08-15 03:28:19 UTC (rev 717)
+++ pkg/xtsExtra/R/plot.R	2012-08-15 04:33:37 UTC (rev 718)
@@ -406,8 +406,8 @@
     x = legend.loc, 
     legend = legend.names, 
     col = col, 
-    lwd = lwd, 
-    pch = if(type != "l") pch else NULL, 
+    lwd = ifelse(!(type %in% c("n","p")), lwd,  NA), 
+    pch = ifelse(type %in% c("p","b","o"), pch, NA), 
     cex = cex, 
     lty = lty, ...))
 }

Modified: pkg/xtsExtra/TODO
===================================================================
--- pkg/xtsExtra/TODO	2012-08-15 03:28:19 UTC (rev 717)
+++ pkg/xtsExtra/TODO	2012-08-15 04:33:37 UTC (rev 718)
@@ -12,9 +12,9 @@
          auto-legend: use code from Performance Analytics. Nees to support blocks, events, lines, etc. 
          xlim acting panelwise
          xlim to allow plotting trading hours only
-         ylab.loc = "above" -- put ylabels where titles normally go
     -- Bugs: 
          labels sometimes overlap (see Jul24 example from KR where Russian and LTCM cross)
+         strange abline() bug reported by Samo; see reproducible example in Aug14 email to JMU
     -- Not Sure: 
         x <- as.xts(sample_matrix); plot(cbind(x, x[,1]), layout = matrix(1:6, ncol = 2)) -- is this a bug? ggplot2 is ok with it