powered by
quoteStockXtsData(x, ...)
## Not run: # stock.xts <- quoteStockXtsData('4689.t') # ## End(Not run)
Run the code above in your browser using DataLab