library(knitr)
library(here)## here() starts at /Users/nathanalexanderlibrary(dplyr)##
## Attaching package: 'dplyr'## The following objects are masked from 'package:stats':
##
## filter, lag## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, unionhere::i_am("hbcu_data.Rmd")## here() starts at /Users/nathanalexander/Dropbox/Teaching/data/hbcuThe hbcu_data data frame contains information about 102 Historically Black Colleges and Universities (HBCUs) in the United States. It includes the following columns:
name: The full name of each HBCU
city: The city where each HBCU is located
state: The state (or territory) where each HBCU is situated
founded: The year each HBCU was established
type: The classification of each institution (e.g., “Public, 4 Year”, “Private, 4 Year”, “Public, 2 Year”, etc.)
Create data frame of HBCUs
hbcu_data <- data.frame(name = c(
"Alabama A&M University", "Alabama State University", "Albany State University", "Alcorn State University",
"Allen University", "American Baptist College", "Arkansas Baptist College", "Benedict College",
"Bennett College", "Bethune-Cookman University", "Bishop State Community College", "Bluefield State University",
"Bowie State University", "Central State University", "Cheyney University of Pennsylvania",
"Claflin University", "Clark Atlanta University", "Clinton College", "Coahoma Community College",
"Coppin State University", "Delaware State University", "Denmark Technical College", "Dillard University",
"Edward Waters University", "Elizabeth City State University", "Fayetteville State University",
"Fisk University", "Florida A&M University", "Florida Memorial University", "Fort Valley State University",
"Gadsden State Community College", "Grambling State University", "H. Councill Trenholm State Community College",
"Hampton University", "Harris-Stowe State University", "Hinds Community College at Utica",
"Howard University", "Huston-Tillotson University", "Interdenominational Theological Center",
"J. F. Drake State Community and Technical College", "Jackson State University",
"Jarvis Christian University", "Johnson C. Smith University", "Kentucky State University",
"Lane College", "Langston University", "Lawson State Community College", "LeMoyne-Owen College",
"Lincoln University (MO)", "Lincoln University (PA)", "Livingstone College", "Meharry Medical College",
"Miles College", "Mississippi Valley State University", "Morehouse College", "Morehouse School of Medicine",
"Morgan State University", "Morris Brown College", "Morris College", "Norfolk State University",
"North Carolina A&T State University", "North Carolina Central University", "Oakwood University",
"Paine College", "Paul Quinn College", "Payne Theological Seminary", "Philander Smith University",
"Prairie View A&M University", "Rust College", "Saint Augustine's University", "Savannah State University",
"Selma University", "Shaw University", "Shelton State Community College", "Shorter College",
"Simmons College of Kentucky", "South Carolina State University", "Southern University and A&M College",
"Southern University at New Orleans", "Southern University at Shreveport", "Southwestern Christian College",
"Spelman College", "St. Philip's College", "Stillman College", "Talladega College", "Tennessee State University",
"Texas College", "Texas Southern University", "Tougaloo College", "Tuskegee University",
"University of Arkansas at Pine Bluff", "University of Maryland Eastern Shore",
"University of the District of Columbia", "University of the Virgin Islands", "Virginia State University",
"Virginia Union University", "Voorhees University", "West Virginia State University",
"Wilberforce University", "Wiley College", "Winston-Salem State University",
"Xavier University of Louisiana"
))hbcu_data$city <- c(
"Normal", "Montgomery", "Albany", "Lorman", "Columbia", "Nashville", "Little Rock", "Columbia",
"Greensboro", "Daytona Beach", "Mobile", "Bluefield", "Bowie", "Wilberforce", "Cheyney",
"Orangeburg", "Atlanta", "Rock Hill", "Clarksdale", "Baltimore", "Dover", "Denmark", "New Orleans",
"Jacksonville", "Elizabeth City", "Fayetteville", "Nashville", "Tallahassee", "Miami Gardens",
"Fort Valley", "Gadsden", "Grambling", "Montgomery", "Hampton", "St. Louis", "Utica",
"Washington", "Austin", "Atlanta", "Huntsville", "Jackson", "Hawkins", "Charlotte", "Frankfort",
"Jackson", "Langston", "Birmingham", "Memphis", "Jefferson City", "Lincoln University",
"Salisbury", "Nashville", "Fairfield", "Itta Bena", "Atlanta", "Atlanta", "Baltimore", "Atlanta",
"Sumter", "Norfolk", "Greensboro", "Durham", "Huntsville", "Augusta", "Dallas", "Wilberforce",
"Little Rock", "Prairie View", "Holly Springs", "Raleigh", "Savannah", "Selma", "Raleigh",
"Tuscaloosa", "North Little Rock", "Louisville", "Orangeburg", "Baton Rouge", "New Orleans",
"Shreveport", "Terrell", "Atlanta", "San Antonio", "Tuscaloosa", "Talladega", "Nashville",
"Tyler", "Houston", "Tougaloo", "Tuskegee", "Pine Bluff", "Princess Anne", "Washington",
"St. Thomas", "Petersburg", "Richmond", "Denmark", "Institute", "Wilberforce", "Marshall",
"Winston-Salem", "New Orleans"
)hbcu_data$state <- c(
"AL", "AL", "GA", "MS", "SC", "TN", "AR", "SC", "NC", "FL", "AL", "WV", "MD", "OH", "PA",
"SC", "GA", "SC", "MS", "MD", "DE", "SC", "LA", "FL", "NC", "NC", "TN", "FL", "FL", "GA",
"AL", "LA", "AL", "VA", "MO", "MS", "DC", "TX", "GA", "AL", "MS", "TX", "NC", "KY", "TN",
"OK", "AL", "TN", "MO", "PA", "NC", "TN", "AL", "MS", "GA", "GA", "MD", "GA", "SC", "VA",
"NC", "NC", "AL", "GA", "TX", "OH", "AR", "TX", "MS", "NC", "GA", "AL", "NC", "AL", "AR",
"KY", "SC", "LA", "LA", "LA", "TX", "GA", "TX", "AL", "AL", "TN", "TX", "TX", "MS", "AL",
"AR", "MD", "DC", "USVI", "VA", "VA", "SC", "WV", "OH", "TX", "NC", "LA"
)hbcu_data$founded <- c(
1875, 1867, 1903, 1871, 1870, 1924, 1884, 1870, 1873, 1904, 1927, 1895, 1865, 1887, 1837,
1869, 1988, 1894, 1949, 1900, 1891, 1948, 1869, 1866, 1891, 1867, 1866, 1887, 1879, 1895,
1925, 1901, 1963, 1868, 1857, 1903, 1867, 1875, 1958, 1961, 1877, 1912, 1867, 1886, 1882,
1897, 1965, 1862, 1866, 1854, 1879, 1876, 1905, 1950, 1867, 1975, 1867, 1881, 1908, 1935,
1891, 1910, 1896, 1896, 1872, 1872, 1894, 1876, 1866, 1867, 1890, 1878, 1865, 1952, 1886,
1879, 1896, 1880, 1956, 1964, 1949, 1881, 1898, 1876, 1867, 1912, 1894, 1947, 1871, 1867,
1873, 1886, 1962, 1882, 1865, 1886, 1962, 1865, 1856, 1873, 1892, 1915
)hbcu_data$lat <- c(
34.7834, 32.3643, 31.5785, 31.8769, 34.0298, 36.1659, 34.7465, 34.0298, 36.0726, 29.2108,
30.6954, 37.2699, 39.0186, 39.7120, 39.9326, 33.4956, 33.7463, 34.9249, 34.2001, 39.3114,
39.1871, 33.3154, 29.9626, 30.3471, 36.2779, 35.0726, 36.1659, 30.4219, 25.9860, 32.5560,
34.0143, 32.5249, 32.3643, 37.0299, 38.6270, 32.4015, 38.9227, 30.2672, 33.7463, 34.7299,
32.2970, 32.7610, 35.2271, 38.2009, 35.6145, 35.9456, 33.5186, 35.1187, 38.5767, 39.8070,
35.6724, 36.1659, 33.4909, 33.4504, 33.7463, 33.7463, 39.3434, 33.7463, 33.9204, 36.8508,
36.0726, 35.9756, 34.7299, 33.4709, 32.7767, 39.7120, 34.7465, 30.0977, 34.7700, 35.7796,
32.0809, 32.4090, 35.7796, 33.1849, 34.7568, 38.2542, 33.4956, 30.4219, 29.9626, 32.5249,
32.4710, 33.7463, 29.4259, 33.1849, 33.4709, 36.1659, 32.3512, 29.7260, 32.3896, 32.4303,
34.2465, 38.2132, 38.9072, 18.3432, 37.2366, 37.5483, 33.3154, 38.3792, 39.7120, 32.5449,
36.0914, 29.9626
)hbcu_data$lon <- c(
-86.5683, -86.2952, -84.1543, -91.1458, -81.0115, -86.7844, -92.2880, -81.0115, -79.7920,
-81.0228, -88.0399, -81.2223, -76.7730, -83.8825, -75.4027, -80.7848, -84.4140, -81.0253,
-90.5707, -76.6585, -75.5237, -81.1345, -90.1324, -81.6723, -76.2180, -78.8836, -86.7844,
-84.2807, -80.2455, -83.8957, -86.0066, -92.7149, -86.2952, -76.3353, -90.2323, -90.6032,
-77.0194, -97.7431, -84.4140, -86.5858, -90.1795, -94.9827, -80.8431, -84.8733, -88.8139,
-97.2553, -86.8110, -90.0320, -92.1735, -75.9252, -80.4744, -86.7844, -86.9100, -90.3279,
-84.4140, -84.4140, -76.5830, -84.4140, -80.3528, -76.2597, -79.7920, -78.8986, -86.5858,
-81.9754, -96.7699, -83.8825, -92.2880, -95.9872, -89.4492, -78.6382, -81.1498, -87.0211,
-78.6382, -87.5692, -92.2674, -85.7594, -80.7848, -91.1867, -90.0820, -93.7501, -96.2736,
-84.4140, -98.4951, -87.5692, -86.0594, -86.7844, -95.2810, -95.3698, -90.5321, -85.7077,
-91.9912, -75.6873, -77.0369, -64.9560, -77.4260, -77.4753, -81.1345, -81.7617, -83.8825,
-94.3674, -80.2442, -90.1324
)hbcu_data$type <- c(
"Public, 4 Year", "Public, 4 Year", "Public, 4 Year", "Public, 4 Year", "Private, 4 Year",
"Private, 4 Year", "Private, 4 Year", "Private, 4 Year", "Private, 4 Year", "Private, 4 Year",
"Public, 2 Year", "Public, 4 Year", "Public, 4 Year", "Public, 4 Year", "Public, 4 Year",
"Private, 4 Year", "Private, 4 Year", "Private, 2 Year", "Public, 2 Year", "Public, 4 Year",
"Public, 4 Year", "Public, 2 Year", "Private, 4 Year", "Private, 4 Year", "Public, 4 Year",
"Public, 4 Year", "Private, 4 Year", "Public, 4 Year", "Private, 4 Year", "Public, 4 Year",
"Public, 2 Year", "Public, 4 Year", "Public, 2 Year", "Private, 4 Year", "Public, 4 Year",
"Public, 2 Year", "Private, 4 Year", "Private, 4 Year", "Private, Specialized",
"Public, 2 Year", "Public, 4 Year", "Private, 4 Year", "Private, 4 Year", "Public, 4 Year",
"Private, 4 Year", "Public, 4 Year", "Public, 2 Year", "Private, 4 Year", "Public, 4 Year",
"Public, 4 Year", "Private, 4 Year", "Private, Specialized", "Private, 4 Year",
"Public, 4 Year", "Private, 4 Year", "Private, Specialized", "Public, 4 Year",
"Private, 4 Year", "Private, 4 Year", "Public, 4 Year", "Public, 4 Year", "Public, 4 Year",
"Private, 4 Year", "Private, 4 Year", "Private, 4 Year", "Private, Specialized",
"Private, 4 Year", "Public, 4 Year", "Private, 4 Year", "Private, 4 Year", "Public, 4 Year",
"Private, 4 Year", "Private, 4 Year", "Public, 2 Year", "Private, 2 Year", "Private, 4 Year",
"Public, 4 Year", "Public, 4 Year", "Public, 4 Year", "Public, 2 Year", "Private, 4 Year",
"Private, 4 Year", "Public, 2 Year", "Private, 4 Year", "Private, 4 Year", "Public, 4 Year",
"Private, 4 Year", "Public, 4 Year", "Private, 4 Year", "Private, 4 Year", "Public, 4 Year",
"Public, 4 Year", "Public, 4 Year", "Public, 4 Year", "Public, 4 Year", "Private, 4 Year",
"Private, 4 Year", "Public, 4 Year", "Private, 4 Year", "Private, 4 Year", "Public, 4 Year",
"Private, 4 Year"
)hbcu_data## name city state
## 1 Alabama A&M University Normal AL
## 2 Alabama State University Montgomery AL
## 3 Albany State University Albany GA
## 4 Alcorn State University Lorman MS
## 5 Allen University Columbia SC
## 6 American Baptist College Nashville TN
## 7 Arkansas Baptist College Little Rock AR
## 8 Benedict College Columbia SC
## 9 Bennett College Greensboro NC
## 10 Bethune-Cookman University Daytona Beach FL
## 11 Bishop State Community College Mobile AL
## 12 Bluefield State University Bluefield WV
## 13 Bowie State University Bowie MD
## 14 Central State University Wilberforce OH
## 15 Cheyney University of Pennsylvania Cheyney PA
## 16 Claflin University Orangeburg SC
## 17 Clark Atlanta University Atlanta GA
## 18 Clinton College Rock Hill SC
## 19 Coahoma Community College Clarksdale MS
## 20 Coppin State University Baltimore MD
## 21 Delaware State University Dover DE
## 22 Denmark Technical College Denmark SC
## 23 Dillard University New Orleans LA
## 24 Edward Waters University Jacksonville FL
## 25 Elizabeth City State University Elizabeth City NC
## 26 Fayetteville State University Fayetteville NC
## 27 Fisk University Nashville TN
## 28 Florida A&M University Tallahassee FL
## 29 Florida Memorial University Miami Gardens FL
## 30 Fort Valley State University Fort Valley GA
## 31 Gadsden State Community College Gadsden AL
## 32 Grambling State University Grambling LA
## 33 H. Councill Trenholm State Community College Montgomery AL
## 34 Hampton University Hampton VA
## 35 Harris-Stowe State University St. Louis MO
## 36 Hinds Community College at Utica Utica MS
## 37 Howard University Washington DC
## 38 Huston-Tillotson University Austin TX
## 39 Interdenominational Theological Center Atlanta GA
## 40 J. F. Drake State Community and Technical College Huntsville AL
## 41 Jackson State University Jackson MS
## 42 Jarvis Christian University Hawkins TX
## 43 Johnson C. Smith University Charlotte NC
## 44 Kentucky State University Frankfort KY
## 45 Lane College Jackson TN
## 46 Langston University Langston OK
## 47 Lawson State Community College Birmingham AL
## 48 LeMoyne-Owen College Memphis TN
## 49 Lincoln University (MO) Jefferson City MO
## 50 Lincoln University (PA) Lincoln University PA
## 51 Livingstone College Salisbury NC
## 52 Meharry Medical College Nashville TN
## 53 Miles College Fairfield AL
## 54 Mississippi Valley State University Itta Bena MS
## 55 Morehouse College Atlanta GA
## 56 Morehouse School of Medicine Atlanta GA
## 57 Morgan State University Baltimore MD
## 58 Morris Brown College Atlanta GA
## 59 Morris College Sumter SC
## 60 Norfolk State University Norfolk VA
## 61 North Carolina A&T State University Greensboro NC
## 62 North Carolina Central University Durham NC
## 63 Oakwood University Huntsville AL
## 64 Paine College Augusta GA
## 65 Paul Quinn College Dallas TX
## 66 Payne Theological Seminary Wilberforce OH
## 67 Philander Smith University Little Rock AR
## 68 Prairie View A&M University Prairie View TX
## 69 Rust College Holly Springs MS
## 70 Saint Augustine's University Raleigh NC
## 71 Savannah State University Savannah GA
## 72 Selma University Selma AL
## 73 Shaw University Raleigh NC
## 74 Shelton State Community College Tuscaloosa AL
## 75 Shorter College North Little Rock AR
## 76 Simmons College of Kentucky Louisville KY
## 77 South Carolina State University Orangeburg SC
## 78 Southern University and A&M College Baton Rouge LA
## 79 Southern University at New Orleans New Orleans LA
## 80 Southern University at Shreveport Shreveport LA
## 81 Southwestern Christian College Terrell TX
## 82 Spelman College Atlanta GA
## 83 St. Philip's College San Antonio TX
## 84 Stillman College Tuscaloosa AL
## 85 Talladega College Talladega AL
## 86 Tennessee State University Nashville TN
## 87 Texas College Tyler TX
## 88 Texas Southern University Houston TX
## 89 Tougaloo College Tougaloo MS
## 90 Tuskegee University Tuskegee AL
## 91 University of Arkansas at Pine Bluff Pine Bluff AR
## 92 University of Maryland Eastern Shore Princess Anne MD
## 93 University of the District of Columbia Washington DC
## 94 University of the Virgin Islands St. Thomas USVI
## 95 Virginia State University Petersburg VA
## 96 Virginia Union University Richmond VA
## 97 Voorhees University Denmark SC
## 98 West Virginia State University Institute WV
## 99 Wilberforce University Wilberforce OH
## 100 Wiley College Marshall TX
## 101 Winston-Salem State University Winston-Salem NC
## 102 Xavier University of Louisiana New Orleans LA
## founded lat lon type
## 1 1875 34.7834 -86.5683 Public, 4 Year
## 2 1867 32.3643 -86.2952 Public, 4 Year
## 3 1903 31.5785 -84.1543 Public, 4 Year
## 4 1871 31.8769 -91.1458 Public, 4 Year
## 5 1870 34.0298 -81.0115 Private, 4 Year
## 6 1924 36.1659 -86.7844 Private, 4 Year
## 7 1884 34.7465 -92.2880 Private, 4 Year
## 8 1870 34.0298 -81.0115 Private, 4 Year
## 9 1873 36.0726 -79.7920 Private, 4 Year
## 10 1904 29.2108 -81.0228 Private, 4 Year
## 11 1927 30.6954 -88.0399 Public, 2 Year
## 12 1895 37.2699 -81.2223 Public, 4 Year
## 13 1865 39.0186 -76.7730 Public, 4 Year
## 14 1887 39.7120 -83.8825 Public, 4 Year
## 15 1837 39.9326 -75.4027 Public, 4 Year
## 16 1869 33.4956 -80.7848 Private, 4 Year
## 17 1988 33.7463 -84.4140 Private, 4 Year
## 18 1894 34.9249 -81.0253 Private, 2 Year
## 19 1949 34.2001 -90.5707 Public, 2 Year
## 20 1900 39.3114 -76.6585 Public, 4 Year
## 21 1891 39.1871 -75.5237 Public, 4 Year
## 22 1948 33.3154 -81.1345 Public, 2 Year
## 23 1869 29.9626 -90.1324 Private, 4 Year
## 24 1866 30.3471 -81.6723 Private, 4 Year
## 25 1891 36.2779 -76.2180 Public, 4 Year
## 26 1867 35.0726 -78.8836 Public, 4 Year
## 27 1866 36.1659 -86.7844 Private, 4 Year
## 28 1887 30.4219 -84.2807 Public, 4 Year
## 29 1879 25.9860 -80.2455 Private, 4 Year
## 30 1895 32.5560 -83.8957 Public, 4 Year
## 31 1925 34.0143 -86.0066 Public, 2 Year
## 32 1901 32.5249 -92.7149 Public, 4 Year
## 33 1963 32.3643 -86.2952 Public, 2 Year
## 34 1868 37.0299 -76.3353 Private, 4 Year
## 35 1857 38.6270 -90.2323 Public, 4 Year
## 36 1903 32.4015 -90.6032 Public, 2 Year
## 37 1867 38.9227 -77.0194 Private, 4 Year
## 38 1875 30.2672 -97.7431 Private, 4 Year
## 39 1958 33.7463 -84.4140 Private, Specialized
## 40 1961 34.7299 -86.5858 Public, 2 Year
## 41 1877 32.2970 -90.1795 Public, 4 Year
## 42 1912 32.7610 -94.9827 Private, 4 Year
## 43 1867 35.2271 -80.8431 Private, 4 Year
## 44 1886 38.2009 -84.8733 Public, 4 Year
## 45 1882 35.6145 -88.8139 Private, 4 Year
## 46 1897 35.9456 -97.2553 Public, 4 Year
## 47 1965 33.5186 -86.8110 Public, 2 Year
## 48 1862 35.1187 -90.0320 Private, 4 Year
## 49 1866 38.5767 -92.1735 Public, 4 Year
## 50 1854 39.8070 -75.9252 Public, 4 Year
## 51 1879 35.6724 -80.4744 Private, 4 Year
## 52 1876 36.1659 -86.7844 Private, Specialized
## 53 1905 33.4909 -86.9100 Private, 4 Year
## 54 1950 33.4504 -90.3279 Public, 4 Year
## 55 1867 33.7463 -84.4140 Private, 4 Year
## 56 1975 33.7463 -84.4140 Private, Specialized
## 57 1867 39.3434 -76.5830 Public, 4 Year
## 58 1881 33.7463 -84.4140 Private, 4 Year
## 59 1908 33.9204 -80.3528 Private, 4 Year
## 60 1935 36.8508 -76.2597 Public, 4 Year
## 61 1891 36.0726 -79.7920 Public, 4 Year
## 62 1910 35.9756 -78.8986 Public, 4 Year
## 63 1896 34.7299 -86.5858 Private, 4 Year
## 64 1896 33.4709 -81.9754 Private, 4 Year
## 65 1872 32.7767 -96.7699 Private, 4 Year
## 66 1872 39.7120 -83.8825 Private, Specialized
## 67 1894 34.7465 -92.2880 Private, 4 Year
## 68 1876 30.0977 -95.9872 Public, 4 Year
## 69 1866 34.7700 -89.4492 Private, 4 Year
## 70 1867 35.7796 -78.6382 Private, 4 Year
## 71 1890 32.0809 -81.1498 Public, 4 Year
## 72 1878 32.4090 -87.0211 Private, 4 Year
## 73 1865 35.7796 -78.6382 Private, 4 Year
## 74 1952 33.1849 -87.5692 Public, 2 Year
## 75 1886 34.7568 -92.2674 Private, 2 Year
## 76 1879 38.2542 -85.7594 Private, 4 Year
## 77 1896 33.4956 -80.7848 Public, 4 Year
## 78 1880 30.4219 -91.1867 Public, 4 Year
## 79 1956 29.9626 -90.0820 Public, 4 Year
## 80 1964 32.5249 -93.7501 Public, 2 Year
## 81 1949 32.4710 -96.2736 Private, 4 Year
## 82 1881 33.7463 -84.4140 Private, 4 Year
## 83 1898 29.4259 -98.4951 Public, 2 Year
## 84 1876 33.1849 -87.5692 Private, 4 Year
## 85 1867 33.4709 -86.0594 Private, 4 Year
## 86 1912 36.1659 -86.7844 Public, 4 Year
## 87 1894 32.3512 -95.2810 Private, 4 Year
## 88 1947 29.7260 -95.3698 Public, 4 Year
## 89 1871 32.3896 -90.5321 Private, 4 Year
## 90 1867 32.4303 -85.7077 Private, 4 Year
## 91 1873 34.2465 -91.9912 Public, 4 Year
## 92 1886 38.2132 -75.6873 Public, 4 Year
## 93 1962 38.9072 -77.0369 Public, 4 Year
## 94 1882 18.3432 -64.9560 Public, 4 Year
## 95 1865 37.2366 -77.4260 Public, 4 Year
## 96 1886 37.5483 -77.4753 Private, 4 Year
## 97 1962 33.3154 -81.1345 Private, 4 Year
## 98 1865 38.3792 -81.7617 Public, 4 Year
## 99 1856 39.7120 -83.8825 Private, 4 Year
## 100 1873 32.5449 -94.3674 Private, 4 Year
## 101 1892 36.0914 -80.2442 Public, 4 Year
## 102 1915 29.9626 -90.1324 Private, 4 Year# Count HBCUs by state
hbcu_count <- hbcu_data %>%
count(state, name = "count") %>%
arrange(desc(count))
# Display the results
knitr::kable(hbcu_count, caption = "Number of HBCUs by State")| state | count |
|---|---|
| AL | 14 |
| GA | 10 |
| NC | 10 |
| TX | 9 |
| SC | 8 |
| MS | 7 |
| LA | 6 |
| TN | 6 |
| AR | 4 |
| FL | 4 |
| MD | 4 |
| VA | 4 |
| OH | 3 |
| DC | 2 |
| KY | 2 |
| MO | 2 |
| PA | 2 |
| WV | 2 |
| DE | 1 |
| OK | 1 |
| USVI | 1 |
# Save the hbcu_data data frame as a CSV file
write.csv(hbcu_data, file = "hbcu_data.csv", row.names = FALSE)