2013-10-15 47 views
1

我有大約2000左右的股票行情,我使用加載到R:遍歷通過getSymbols返回環境中的物體

companyList <- read.csv("~/Downloads/companylist.csv") 
#saved all 2000 symbols inside the variable "ticker" 
ticker <- as.vector(as.character(companyList[1:2000, 'Symbol'])) 
StockData <- new.env() 
data <- getSymbols(ticker, env = stockData) 

我似乎無法弄清楚如何運行的每個股票的數據進行計算而無需手動。

回答

1

您可以使用eapply

eapply(stockData, FUN=calcul) 
+0

反正把這個變成一個if語句來檢查每個股票的結果嗎? –

+0

結果只是您的庫存變量的命名清單。 – agstudy