Create loaddata.r