tests/testthat/setup.R

In jacobkap/borderpatrol: What the Package Does (One Line, Title Case)

southwest_sectors <- c("big bend",
                       "del rio",
                       "el centro",
                       "el paso",
                       "laredo",
                       "rio grande valley",
                       "san diego",
                       "tucson",
                       "yuma",
                       "southwest border")

coastal_sectors <- c("miami",
                       "new orleans",
                       "ramey",
                       "coastal border")

northern_sectors <- c("blaine",
                      "buffalo",
                      "detroit",
                      "grand forks",
                      "havre",
                      "houlton",
                      "spokane",
                      "swanton",
                      "northern border")

all_borders <- c(southwest_sectors,
                 coastal_sectors,
                 northern_sectors,
                 "nationwide total")