Update GetIntradayPrice.R