modified R code to account for proper input data variable names (using make.names()). added code for proper output data variable names -> non-functional at this point