# NOT RUN {
stock("IWC", currency("USD"))
update_instruments.iShares("IWC")
getInstrument("IWC")
Symbols <- stock(c("SPY", "JNK"), currency("USD"))
update_instruments.SPDR(Symbols)
buildHierarchy(c("SPY", "JNK"), "Name")
# }
Run the code above in your browser using DataLab