New file loaddata.R for loading data from data file.