Hello I downloaded RStudio it and works well!|

Here’s the frame’s content from ACS survey:

##        County CurrentPop EarlierPop       Region
## 1      Cannon      14818      13958 Non-doughnut
## 2    Cheatham      41829      39087     Doughnut
## 3    Davidson     715388     598184     Davidson
## 4     Dickson      55983      51608 Non-doughnut
## 5     Hickman      25436      24561 Non-doughnut
## 6       Macon      26240      23261 Non-doughnut
## 7       Maury     107791      88738 Non-doughnut
## 8   Robertson      75539      67517     Doughnut
## 9  Rutherford     360646     292425     Doughnut
## 10      Smith      20389      19389 Non-doughnut
## 11     Sumner     204424     174773     Doughnut
## 12  Trousdale      11957      10131 Non-doughnut
## 13 Williamson     260351     208242     Doughnut
## 14     Wilson     158805     129918     Doughnut

Code

County <- c("Cannon", "Cheatham", "Davidson", "Dickson", "Hickman", "Macon", 
            "Maury", "Robertson", "Rutherford", "Smith", "Sumner", "Trousdale", 
            "Williamson", "Wilson")

CurrentPop <- c(14818, 41829, 715388, 55983, 25436, 26240, 107791, 75539, 360646, 
                20389, 204424, 11957, 260351, 158805)

EarlierPop <- c(13958, 39087, 598184, 51608, 24561, 23261, 88738, 67517, 292425, 
                19389, 174773, 10131, 208242, 129918)

Region <- c("Non-doughnut", "Doughnut", "Davidson", "Non-doughnut", "Non-doughnut", 
            "Non-doughnut", "Non-doughnut", "Doughnut", "Doughnut", "Non-doughnut", 
            "Doughnut", "Non-doughnut", "Doughnut", "Doughnut")

Population <- data.frame(
  County,
  CurrentPop,
  EarlierPop,
  Region
)

Population