HTTP status was '404 Not Found'

classic Classic list List threaded Threaded
2 messages Options
Reply | Threaded
Open this post in threaded view
|

HTTP status was '404 Not Found'

Lemma
HiSo I tried running the p but i'm stuck as i get the following error: 
In download.file(url, destfile, method = method, quiet = quiet) :  cannot open URL 'http://chart.yahoo.com/table.csv?s=DJI&a=2&b=13&c=2012&d=2&e=07&f=2017&g=d&q=q&y=0&z=DJI&x=.csv': HTTP status was '404 Not Found'

Here is the R code:
library(vars)library(tawny)library(quantmod)library(MASS)library(stats)library(DEoptim)library(sn)library(SkewHyperbolic)library(tseries)symbols<-getSymbols(c("^GSPC", "^DJI"))endDate <- Sys.Date()startDate <- endDate - as.difftime(52*5, unit="weeks")quoteType <- "Close"p <- do.call(cbind, lapply(symbols, get.hist.quote, start=startDate, end=endDate,  quote=quoteType))

        [[alternative HTML version deleted]]

______________________________________________
[hidden email] mailing list -- To UNSUBSCRIBE and more, see
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
Reply | Threaded
Open this post in threaded view
|

Re: HTTP status was '404 Not Found'

Joshua Ulrich
On Tue, Mar 7, 2017 at 2:52 AM, Allan Tanaka <[hidden email]> wrote:
> HiSo I tried running the p but i'm stuck as i get the following error:
> In download.file(url, destfile, method = method, quiet = quiet) :  cannot open URL 'http://chart.yahoo.com/table.csv?s=DJI&a=2&b=13&c=2012&d=2&e=07&f=2017&g=d&q=q&y=0&z=DJI&x=.csv': HTTP status was '404 Not Found'
>
> Here is the R code:
> library(vars)library(tawny)library(quantmod)library(MASS)library(stats)library(DEoptim)library(sn)library(SkewHyperbolic)library(tseries)symbols<-getSymbols(c("^GSPC", "^DJI"))endDate <- Sys.Date()startDate <- endDate - as.difftime(52*5, unit="weeks")quoteType <- "Close"p <- do.call(cbind, lapply(symbols, get.hist.quote, start=startDate, end=endDate,  quote=quoteType))
>
Please try to post *minimal* reproducible examples.  Only two packages
are needed to run your code.

library(quantmod)
library(tseries)

symbols<-getSymbols(c("^GSPC", "^DJI"))
endDate <- Sys.Date()
startDate <- endDate - as.difftime(52*5, unit="weeks")
quoteType <- "Close"
p <- do.call(cbind, lapply(symbols, get.hist.quote,
  start=startDate, end=endDate,  quote=quoteType))

Your calls with get.hist.quote() are not what you expect.  Note that
the tickers you passed to getSymbols() are "^GSPC" and "^DJI".  But
those are not the objects that getSymbols() creates (or the adjusted
ticker symbols it returns), because they are not syntatically valid R
names (because they start with a circumflex).

So you call get.hist.quote() with tickers "GSPC" and "DJI", which are
not the S&P 500 and Dow Jones Industrial indexes, respectively.  The
GSPC data is not what you expect, and there's no data for DJI.

>         [[alternative HTML version deleted]]
>
Please follow the posting guide and do not post HTML.  The list server
does not like it and can mangle your message, as it did in this case.

> ______________________________________________
> [hidden email] mailing list -- To UNSUBSCRIBE and more, see
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.



--
Joshua Ulrich  |  about.me/joshuaulrich
FOSS Trading  |  www.fosstrading.com
R/Finance 2017 | www.rinfinance.com

______________________________________________
[hidden email] mailing list -- To UNSUBSCRIBE and more, see
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.