removed startup message -- everyone can thank Dirk

removed remaining code that is now in xts updated version number to 0.3-9 updated docs for attachSymbols git-svn-id: svn+ssh://svn.r-forge.r-project.org/svnroot/quantmod/pkg@488 edb9625f-4e0d-4859-8d74-9fd3b1da38cb
joshuaulrich · May 5, 2009 · 5b2197c · 5b2197c
1 parent 06b2ec7
commit 5b2197c
Show file tree

Hide file tree

Showing 8 changed files with 20 additions and 375 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,8 +1,8 @@
 Package: quantmod
 Type: Package
 Title: Quantitative Financial Modelling Framework
-Version: 0.3-8
-Date: 2008-11-20
+Version: 0.3-9
+Date: 2009-05-05
 Author: Jeffrey A. Ryan
 Depends: methods,xts(>= 0.0-15),zoo,Defaults,TTR(>= 0.2)
 Suggests: DBI,RMySQL,RSQLite,fSeries,its

diff --git a/R/breakpoints.R b/R/breakpoints.R
diff --git a/R/chartSeries.chob.R b/R/chartSeries.chob.R
@@ -44,6 +44,17 @@ function(x)
     Highs <- max(xx[,1],na.rm=TRUE)
     Closes <- as.numeric(xx[,1])
   }
+  if(x@type="Heikin-Ashi") {
+#    xCloses <- (Opens+Highs+Lows+Closes)/4
+#    xOpens  <- (Opens + lag(Closes)) / 2
+#    xHighs  <- max(c(Highs, xOpens, xCloses),na=TRUE)
+#    xLows   <- min(c(Lows,  xOpens, xCloses),na=TRUE)
+    Closes <- xCloses
+    Opens  <- xOpens
+    Highs  <- xHighs
+    Lows   <- xLows
+    x@type <- "candlesticks"
+  }
 
   par(bg=x@colors$bg.col,col.axis=x@colors$fg.col,
       xaxs='r',las=2,fg=x@colors$fg.col)

diff --git a/R/fast.to.period.R b/R/fast.to.period.R
diff --git a/R/period.apply.R b/R/period.apply.R