Create ITSwR7-Segments.R