Commit 834f99a3 authored by Dirk Eddelbuettel's avatar Dirk Eddelbuettel

Import Upstream version 0.10-9

parent 3d72e0e3
2007-02-11 Kurt Hornik <Kurt.Hornik@wu-wien.ac.at>
* DESCRIPTION (Version): New version is 0.10-9.
* R/finance.R (get.hist.quote): Adjust for Yahoo's change its CSV
files to use standard %Y-%m-%d dates.
2007-02-01 Kurt Hornik <Kurt.Hornik@wu-wien.ac.at>
* DESCRIPTION (Version): New version is 0.10-8.
......
Package: tseries
Version: 0.10-8
Date: 2007-02-01
Version: 0.10-9
Date: 2007-02-11
Title: Time series analysis and computational finance
Author: Compiled by Adrian Trapletti <a.trapletti@swissonline.ch>
Maintainer: Kurt Hornik <Kurt.Hornik@R-project.org>
......@@ -9,4 +9,4 @@ Depends: R (>= 2.2.0), quadprog, stats, zoo
Suggests: its
Imports: graphics, stats, utils
License: GPL-2
Packaged: Thu Feb 1 14:59:28 2007; hornik
Packaged: Sun Feb 11 13:35:36 2007; hornik
......@@ -224,7 +224,7 @@ function (instrument = "^gdax", start, end,
"19",
substr(dat[-idx], nchar(dat[-idx]) - 1, nchar(dat[-idx])),
sep = "")
dat <- as.Date(dat, "%d-%b-%Y")
dat <- as.Date(dat, "%Y-%m-%d")
if(!quiet && dat[n] != start)
cat(format(dat[n], "time series starts %Y-%m-%d\n"))
if(!quiet && dat[1] != end)
......
......@@ -90,8 +90,8 @@ if(!inherits(try(open(url("http://quote.yahoo.com")), silent = TRUE),
quote = "Close")
ibm <- get.hist.quote(instrument = "ibm", start = "1998-01-01",
quote = "AdjClose")
x <- merge(spc, ibm)
plot(x, main = "IBM vs S&P 500")
% x <- merge(spc, ibm)
% plot(x, main = "IBM vs S&P 500")
x <- get.hist.quote(instrument = "EUR/USD", provider = "oanda",
start = "2004-01-01")
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment