すべての形式の getSymbols および get.hist.quote コマンドを使用すると、常にエラーが発生します。エラーは基本的に次のとおりです。
>getSymbols("AAPL")
Error in read.table(file = file, header = header, sep = sep, quote = quote, :
more columns than column names
もう一つの例：
>x <- get.hist.quote(instrument = "^gspc", start = "1998-01-01", quote = "Close")
trying URL 'http://chart.yahoo.com/table.csv?s=^gspc&a=0&b=01&c=1998&d=4&e=12&f=2013&g=d&q=q&y=0&z=^gspc&x=.csv'
Content type 'text/csv' length unknown
opened URL
downloaded 230 Kb
Error in read.table(destfile, header = TRUE, sep = ",", as.is = TRUE, :
more columns than column names
すべてのソースとシンボルで発生しています。どうすれば修正できますか?? ちなみに、同じコマンドは他のコンピューターでも問題なく機能しています。使用するパッケージ: 「quantmod」または「tseries」
コメントで提案されたデバッガーを実行した後、次のようになりました。
> debugonce(read.table)
> getSymbols("AAPL")
Browse[2]> head(readLines(file))
[1] "000fe47"
[2] "Date,Open,High,Low,Close,Volume,Adj Close"
[3] "2013-05-13,451.51,457.90,451.50,454.74,11319600,454.74"
[4] "2013-05-10,457.97,459.71,450.48,452.97,11948800,452.97"
[5] "2013-05-09,459.81,463.00,455.58,456.77,14231700,456.77"
[6] "2013-05-08,459.04,465.37,455.81,463.84,16878500,460.79"
Browse[2]> tail(readLines(file))
[1] "2007-01-05,85.77,86.20,84.40,85.05,29812200,83.26"
[2] "2007-01-04,84.05,85.95,83.82,85.66,30259300,83.86"
[3] "2007-01-03,86.29,86.58,81.90,83.80,44225700,82.04"
[4] ""
[5] "0"
[6] ""
Browse[2]> Q
>