R/locations.R
    pharm_counties.RdGet county GEOID for each pharmacy based on BUYER_DEA_NO (Only includes retail and chain pharmacy designations)
pharm_counties(county = "Mingo", state = "WV", key = "WaPo")Filter the data to only this county (e.g. 'Mingo')
Filter the data to county within this state (e.g. 'WV')
Key needed to make query successful
# \donttest{
library(arcos)
mingo_wv <- pharm_counties(county = "Mingo", state="WV", key="WaPo")
head(mingo_wv)
#>   BUYER_DEA_NO BUYER_COUNTY BUYER_STATE STATEFP COUNTYFP county_fips
#> 1    BM2933263        MINGO          WV      54      059       54059
#> 2    AM2373051        MINGO          WV      54      059       54059
#> 3    BM2373051        MINGO          WV      54      059       54059
#> 4    FM2252372        MINGO          WV      54      099       54099
#> 5    FS1092787        MINGO          WV      54      099       54099
#> 6    BH6954401        MINGO          WV      54      059       54059
# }