"cityList" <-
c("akr", "albu", "arlv", "atla", "aust", "bake", "balt", "batr", 
"bidd", "birm", "bost", "buff", "cayc", "cdrp", "char", "chic", 
"cinc", "clev", "clmg", "clmo", "colo", "corp", "covt", "dayt", 
"dc", "denv", "desm", "det", "dlft", "elpa", "evan", "fres", 
"ftwa", "gdrp", "grnb", "hous", "hunt", "indi", "jcks", "jckv", 
"jers", "kan", "kans", "king", "knox", "la", "lafy", "lasv", 
"lex", "loui", "ltrk", "lubb", "madi", "memp", "miam", "milw", 
"minn", "mobi", "mode", "nash", "no", "nor", "nwk", "ny", "oakl", 
"okla", "olym", "oma", "orla", "phil", "phoe", "pitt", "prov", 
"ral", "rich", "rive", "roch", "sacr", "salt", "sana", "sanb", 
"sand", "sanf", "sanj", "seat", "shr", "spok", "staa", "stlo", 
"stoc", "stpe", "syra", "taco", "tamp", "tole", "tope", "tucs", 
"tuls", "wich", "wor")