starting some simple R code to clean up and normalize data