Innitial commit of functions.R and importData.R