Displaying 1 result from an estimated 1 matches for "symbollist".
Did you mean:
symbol_list
2012 Dec 06
1
Fuction Error
...;FXY','HYG','LQD', '^GSPC')
getSymbols(symbols,from='2007-01-01')
getSymbols('SPY',from='2007-01-01')
SP500 <- Cl(SPY)
colnames(SP500)[1] <- 'SPY'
#Function to build a dataframe form a list of symbols
symbolFrame <- function(symbolList) {
Data <- data.frame(NULL)
for (S in symbolList) {
Data <- cbind(Data,Cl(get(S)))
}
colnames(Data) <- symbolList
return(Data)
}
Data <- symbolFrame(symbols)
[[alternative HTML version deleted]]