Issues with location lookup in getEpiData

[flaneuse]

x = getEpiData(name = c("Los Angeles-Long Beach-Anaheim", "Detroit-Warren-Dearborn, MI", "New Orleans-Metairie, LA"))
-- > LA gets dropped

x = getEpiData(name = c("Los Angeles-Long Beach-Anaheim, CA", "Detroit-Warren-Dearborn, MI", "New Orleans-Metairie, LA"))
x %>% count(name)

--> LA missing data

x = getEpiData(name = c("Los Angeles", "Detroit-Warren-Dearborn, MI", "New Orleans-Metairie, LA"))
--> LA dropped

x = getEpiData(name = "Los Angeles")
--> throws error (no data found?)