updating loadData.R