Update createTextSegmentsRUS.R