## 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")
# ## End(Not run)
Run the code above in your browser using DataLab