add changeNames.R