getTn_part2.R updated