Sys.getenv("CENSUS_API_KEY")
[1] "1e04bf9ac5bbae0d7060b9cdefeb1ba143752a1e"
acs_data <- get_acs(geography = "county", variables = "B19013_001", state = "CA", survey = "acs5")
Getting data from the 2012-2016 5-year ACS
Using FIPS code '06' for state 'CA'
summary(acs_data)
GEOID NAME variable estimate moe
Length:58 Length:58 Length:58 Min. : 35270 Min. : 331
Class :character Class :character Class :character 1st Qu.: 45622 1st Qu.: 986
Mode :character Mode :character Mode :character Median : 54708 Median : 1620
Mean : 58091 Mean : 2104
3rd Qu.: 66757 3rd Qu.: 2701
Max. :101173 Max. :11767

LS0tCnRpdGxlOiAiQ2Vuc3VzIC0gQW1lcmljYW4gQ29tbXVuaXR5IFN1cnZleSBOb3RlYm9vayIKb3V0cHV0OiBodG1sX25vdGVib29rCi0tLQoKYGBge3J9CmxpYnJhcnkodGlkeWNlbnN1cykKIyBsb2FkcyBBUEkgS2V5CnJlYWRSZW52aXJvbigifi8uUmVudmlyb24iKQpgYGAKCmBgYHtyIHN0YXRlQ291bnR5SW5jb21lfQphY3NfZGF0YSA8LSBnZXRfYWNzKGdlb2dyYXBoeSA9ICJjb3VudHkiLCB2YXJpYWJsZXMgPSAiQjE5MDEzXzAwMSIsIHN0YXRlID0gIkNBIiwgc3VydmV5ID0gImFjczUiKQpzdW1tYXJ5KGFjc19kYXRhKQpgYGAKYGBge3Igdml6U3RhdGVDb3VudHlJbmNvbWV9CmxpYnJhcnkodGlkeXZlcnNlKQpsaWJyYXJ5KHZpcmlkaXMpCnZpeiA8LSBhY3NfZGF0YSAlPiUKbXV0YXRlKE5BTUUgPSBnc3ViKCIgQ291bnR5LCBDYWxpZm9ybmlhIiwgIiIsIE5BTUUpKSAlPiUKIGdncGxvdChhZXMoeCA9IGVzdGltYXRlLCB5ID0gcmVvcmRlcihOQU1FLCBlc3RpbWF0ZSkpKSArCiAgZ2VvbV9lcnJvcmJhcmgoYWVzKHhtaW4gPSBlc3RpbWF0ZSAtIG1vZSwgeG1heCA9IGVzdGltYXRlICsgbW9lKSkgKwogIGdlb21fcG9pbnQoY29sb3IgPSAicmVkIiwgc2l6ZSA9IDMpICsKICBsYWJzKHRpdGxlID0gIkhvdXNlaG9sZCBpbmNvbWUgYnkgY291bnR5IGluIENhbGlmb3JuaWEiLAogICAgICAgc3VidGl0bGUgPSAiMjAxMi0yMDE2IEFtZXJpY2FuIENvbW11bml0eSBTdXJ2ZXkiLAogICAgICAgeSA9ICIiLAogICAgICAgeCA9ICJBQ1MgZXN0aW1hdGUgKGJhcnMgcmVwcmVzZW50IG1hcmdpbiBvZiBlcnJvcikiKQp2aXoKYGBg