Update dataTidy.R