## Not run: ------------------------------------
# # Only the front-month expiry
# AAPL.OPT <- getOptionChain("AAPL")
# # All expiries
# AAPL.OPTS <- getOptionChain("AAPL", NULL)
# # All 2015 and 2016 expiries
# AAPL.2015 <- getOptionChain("AAPL", "2015/2016")
## ---------------------------------------------
Run the code above in your browser using DataLab