R Script that pulls stock info from the web and outputs to a csv