Update ReadData.R