我输出以下代码
l.out <- BatchGetSymbols(tickers = tickers,
first.date = first.date,
last.date = last.date,
cache.folder = file.path(tempdir(),
'BGS_Cache') ) # cache in tempdir()
输出如下:
> l.out
$df.control
ticker src download.status total.obs perc.benchmark.dates threshold.decision
1 20MICRONS.NS yahoo OK 41 1 KEEP
2 21STCENMGM.NS yahoo OK 41 1 KEEP
.....
.....
$df.tickers
price.open price.high price.low price.close volume price.adjusted ref.date ticker ret.adjusted.prices ret.closing.prices
1 43.85 43.85 42.05 42.40 22235 42.400 2018-12-21 20MICRONS.NS NA NA
2 42.40 43.15 41.50 41.60 28802 41.600 2018-12-24 20MICRONS.NS -1.886802e-02 -1.886802e-02
3 41.75 42.80 41.40 41.80 12075 41.800 2018
-12-26 20MICRONS.NS 4.807717e-03 4.807717e-03
....
....
$df.tickers
中的“ ticker”列包含所有股票名称。 $df.control
的代码也包含代码名称。
我想做的是将每个股票的数据保存在单独的csv中。有什么方法可以有效地分隔每个行情指示器的数据(如MICRONS.NS),而不是读取for循环中的每一行。
从某种意义上说,整个数据都是一维的,我需要根据列名将数据分成单独的数据。
谢谢