Create ITSwR5-Segments.R