"agegps"<- c("Under 1 year ", "1 and 2 years ", "3 and 4 years ", "5 years ", "6 years ", "7 to 9 years ", "10 and 11 years ", "12 and 13 years ", "14 years ", "15 years ", "16 years ", "17 years ", "18 years ", "19 years ", "20 years ", "21 years ", "22 to 24 years ", "25 to 29 years ", "30 to 34 years ", "35 to 39 years ", "40 to 44 years ", "45 to 49 years ", "50 to 54 years ", "55 to 59 years ", "60 and 61 years ", "62 to 64 years ", "65 to 69 years ", "70 to 74 years ", "75 to 79 years ", "80 to 84 years ", "85 years and over")