Create inputdata.R