According to U.S. Census Bureau data, Bedford County has the highest percentage of Hispanic or Latino residents at 16% in Tennessee. Hamblen County follows, along with Davidson and Rutherford counties. On the other end, several counties, including Grundy, Clay and Scott, have Hispanic or Latino populations of less than 1% in Tennessee. Overall, the data has a relatively small margin of error.

County	Variable	Estimate	Margin of Error
Bedford County, Tennessee	DP05_0090P	16.0	NA
Hamblen County, Tennessee	DP05_0090P	15.1	NA
Davidson County, Tennessee	DP05_0090P	13.9	NA
Rutherford County, Tennessee	DP05_0090P	12.2	NA
Crockett County, Tennessee	DP05_0090P	11.4	NA
Montgomery County, Tennessee	DP05_0090P	11.4	NA
Loudon County, Tennessee	DP05_0090P	10.4	NA
Robertson County, Tennessee	DP05_0090P	10.0	NA
Warren County, Tennessee	DP05_0090P	10.0	NA
Sevier County, Tennessee	DP05_0090P	9.6	NA
Shelby County, Tennessee	DP05_0090P	8.8	NA
Bradley County, Tennessee	DP05_0090P	8.4	NA
Putnam County, Tennessee	DP05_0090P	8.4	NA
Maury County, Tennessee	DP05_0090P	8.1	NA
Hamilton County, Tennessee	DP05_0090P	8.0	NA
DeKalb County, Tennessee	DP05_0090P	7.7	NA
Sumner County, Tennessee	DP05_0090P	7.2	NA
Marshall County, Tennessee	DP05_0090P	7.1	NA
Macon County, Tennessee	DP05_0090P	7.0	NA
Unicoi County, Tennessee	DP05_0090P	6.7	NA
Wilson County, Tennessee	DP05_0090P	6.5	NA
Coffee County, Tennessee	DP05_0090P	6.3	NA
Knox County, Tennessee	DP05_0090P	6.3	NA
Rhea County, Tennessee	DP05_0090P	6.3	NA
Williamson County, Tennessee	DP05_0090P	6.0	NA
Obion County, Tennessee	DP05_0090P	5.5	NA
Madison County, Tennessee	DP05_0090P	5.2	NA
Dickson County, Tennessee	DP05_0090P	5.1	NA
Sequatchie County, Tennessee	DP05_0090P	4.9	NA
Washington County, Tennessee	DP05_0090P	4.9	NA
Cheatham County, Tennessee	DP05_0090P	4.8	NA
Haywood County, Tennessee	DP05_0090P	4.8	NA
Blount County, Tennessee	DP05_0090P	4.7	NA
Jefferson County, Tennessee	DP05_0090P	4.7	NA
Monroe County, Tennessee	DP05_0090P	4.7	NA
McMinn County, Tennessee	DP05_0090P	4.6	NA
Anderson County, Tennessee	DP05_0090P	4.1	NA
Lincoln County, Tennessee	DP05_0090P	4.1	NA
Trousdale County, Tennessee	DP05_0090P	4.1	NA
Dyer County, Tennessee	DP05_0090P	4.0	NA
Greene County, Tennessee	DP05_0090P	3.9	NA
Fayette County, Tennessee	DP05_0090P	3.8	NA
Franklin County, Tennessee	DP05_0090P	3.8	NA
Decatur County, Tennessee	DP05_0090P	3.7	NA
Grainger County, Tennessee	DP05_0090P	3.6	NA
Bledsoe County, Tennessee	DP05_0090P	3.5	NA
Cumberland County, Tennessee	DP05_0090P	3.5	NA
Chester County, Tennessee	DP05_0090P	3.4	NA
Gibson County, Tennessee	DP05_0090P	3.4	NA
Hickman County, Tennessee	DP05_0090P	3.4	NA
Houston County, Tennessee	DP05_0090P	3.2	NA
Johnson County, Tennessee	DP05_0090P	3.2	NA
Lewis County, Tennessee	DP05_0090P	3.2	NA
White County, Tennessee	DP05_0090P	3.2	NA
Cannon County, Tennessee	DP05_0090P	3.1	NA
Carroll County, Tennessee	DP05_0090P	3.1	NA
Cocke County, Tennessee	DP05_0090P	3.1	NA
Lake County, Tennessee	DP05_0090P	3.1	NA
Smith County, Tennessee	DP05_0090P	3.1	NA
Tipton County, Tennessee	DP05_0090P	3.1	NA
Weakley County, Tennessee	DP05_0090P	3.1	NA
Henderson County, Tennessee	DP05_0090P	3.0	NA
Henry County, Tennessee	DP05_0090P	3.0	NA
Stewart County, Tennessee	DP05_0090P	3.0	NA
Giles County, Tennessee	DP05_0090P	2.9	NA
Humphreys County, Tennessee	DP05_0090P	2.9	NA
Benton County, Tennessee	DP05_0090P	2.8	NA
Jackson County, Tennessee	DP05_0090P	2.8	NA
Lauderdale County, Tennessee	DP05_0090P	2.8	NA
Lawrence County, Tennessee	DP05_0090P	2.8	NA
Wayne County, Tennessee	DP05_0090P	2.7	NA
Sullivan County, Tennessee	DP05_0090P	2.6	NA
Carter County, Tennessee	DP05_0090P	2.5	NA
Hardin County, Tennessee	DP05_0090P	2.5	NA
Marion County, Tennessee	DP05_0090P	2.5	NA
Roane County, Tennessee	DP05_0090P	2.5	NA
Union County, Tennessee	DP05_0090P	2.4	NA
Hardeman County, Tennessee	DP05_0090P	2.2	NA
McNairy County, Tennessee	DP05_0090P	2.2	NA
Overton County, Tennessee	DP05_0090P	2.2	NA
Polk County, Tennessee	DP05_0090P	2.2	NA
Van Buren County, Tennessee	DP05_0090P	2.2	NA
Fentress County, Tennessee	DP05_0090P	2.1	NA
Moore County, Tennessee	DP05_0090P	2.1	NA
Pickett County, Tennessee	DP05_0090P	2.1	NA
Hawkins County, Tennessee	DP05_0090P	2.0	NA
Meigs County, Tennessee	DP05_0090P	1.9	1.8
Morgan County, Tennessee	DP05_0090P	1.9	NA
Claiborne County, Tennessee	DP05_0090P	1.7	NA
Campbell County, Tennessee	DP05_0090P	1.6	NA
Hancock County, Tennessee	DP05_0090P	1.5	1.2
Perry County, Tennessee	DP05_0090P	1.4	1.1
Grundy County, Tennessee	DP05_0090P	0.4	0.3
Clay County, Tennessee	DP05_0090P	0.2	0.4
Scott County, Tennessee	DP05_0090P	0.2	0.2

CODE

############################################################
############################################################
# STEP 1: Load Packages
############################################################

if (!require("tidycensus")) install.packages("tidycensus")
if (!require("tidyverse")) install.packages("tidyverse")
if (!require("kableExtra")) install.packages("kableExtra")

library(tidycensus)
library(tidyverse)
library(kableExtra)

############################################################
# STEP 2: Verify Census API Key
############################################################

if (!nzchar(Sys.getenv("CENSUS_API_KEY"))) {
  
  stop(
    paste(
      "\nNo Census API key was found.",
      "\n\nTo obtain a free Census API key, visit:",
      "\nhttps://api.census.gov/data/key_signup.html",
      "\n\nThen run the one-time setup code at the",
      "\ntop of this script to store your key.",
      "\n"
    )
  )
  
}

############################################################
# STEP 3: Explore 2024 Codebooks and Choose an ACS Variable
############################################################

ProfileTables  <- load_variables(2024, "acs5/profile")
# DetailedTables <- load_variables(2024, "acs5")
# SubjectTables  <- load_variables(2024, "acs5/subject")


# Replace the variable code below with the ACS variable
# you want to download.

my_variable <- "DP05_0090P" # <<< CAN CHANGE THE VARIABLE CODE

# Example variables:
#
# DP05_0001  = Total population
# DP03_0062  = Median Household Income
# DP03_0128P = Poverty Rate
# DP02_0068P = Bachelor's Degree or Higher Rate
# DP05_0018  = Median Age
# DP04_0046P = Homeownership Rate
# DP04_0134  = Median Gross Rent
# DP04_0142P = Pct. renters paying 35%+ HH income in rent (GRAPI)
# DP05_0090P = Hispanic or Latino Population Percentage
# DP02_0094P = Foreign-Born Percentage
# DP03_0009P = Unemployment Rate
# DP03_0025  = Average Commute Time

############################################################
# STEP 4: Download Tennessee County Data
############################################################

mydata <- get_acs(
  geography = "county",
  state = "TN",  # <<< CAN CHANGE THE STATE
  year = 2024,
  survey = "acs5",
  variables = my_variable
)

############################################################
# STEP 5: Keep Needed Variables
############################################################

mydata <- mydata |>
  select(
    County = NAME,
    Variable = variable,
    Estimate = estimate,
    Margin_of_Error = moe
  )

############################################################
# STEP 6: Sort Results from Highest to Lowest
############################################################

mydata <- mydata |>
  arrange(desc(Estimate))
############################################################
# STEP 7: Display Results as a Table
############################################################

ResultsTable <- mydata |>
  kbl(
    col.names = c(
      "County",
      "Variable",
      "Estimate",
      "Margin of Error"
    ),
    format.args = list(big.mark = ",")
  ) |>
  kable_styling(
    bootstrap_options = c("striped", "hover"),
    full_width = FALSE
  )

ResultsTable

Report 4

Aaron Cantrell

2026-09-20

CODE