Loop over objects in an environment returned by getSymbols

Question

I have about 2000 or so stock tickers that I loaded into R using:

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)

I can't seem to figure out how to run calculations on each stocks data without doing manually.

Answer 1

You can use eapply:

 eapply(stockData, FUN=calcul)