first draft skeleton R code for reading and munging data