added getstockdata.R