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