change transformData.R