added utils.R, cleaned train.gbm.freq.hom2.R