"south" <- c(12, 10, 10, 13, 12, 12, 14, 7, 16, 18, 8, 29, 12, 14, 33, 10, 6, 18, 11, 25, 8, 16, 14, 11, 10, 20, 14, 11, 12, 13)