BORdata: Bureau of Reclamation Data

crb_dams_full <-
structure(list(region = c("Main Stem", "Main Stem", "Main Stem", 
"Main Stem", "Main Stem", "Main Stem", "Main Stem", "Main Stem", 
"Main Stem", "Main Stem", "Main Stem", "Main Stem", "Main Stem", 
"Main Stem", "Main Stem", "Upper Basin", "Upper Basin", "Upper Basin", 
"Upper Basin", "Upper Basin", "Upper Basin", "Upper Basin", "Upper Basin", 
"Upper Basin", "Upper Basin", "Upper Basin", "Upper Basin", "Upper Basin", 
"Upper Basin", "Upper Basin", "Upper Basin", "Upper Basin", "Upper Basin", 
"Upper Basin", "Upper Basin", "Upper Basin", "Lower Basin", "Lower Basin", 
"Lower Basin", "Lower Basin", "Lower Basin", "Lower Basin", "Lower Basin", 
"Lower Basin", "Lower Basin", "Lower Basin", "Lower Basin", "Lower Basin"
), `AnnualGeneration(MWh)` = c(NA, NA, NA, NA, NA, 456944, 1147673, 
3806935, 3454847, NA, 19350, NA, NA, NA, 8885749, 203412, NA, 
344369, 67043, 60228, NA, 5335, 292887, 215000, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, 1188274, NA, NA, NA, 126900, NA, 
65400, NA, NA, NA, 57700, 123900, 373900), `Capacity(MW)` = c(NA, 
NA, NA, NA, 19, 120, 255, 2079, 1296, NA, 3, NA, NA, NA, 3772, 
86, 1, 153, 10, 21, NA, 1, 173, 32, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, 3, NA, 482, NA, NA, NA, 129, NA, 60, 45, NA, NA, 13, 
36, 283), Name = c("Morelos Dam", "Laguna Diversion Dam", "Imperial Dam", 
"Palo Verde Dam", "Headgate Rock Dam", "Parker Dam", "Davis Dam", 
"Hoover Dam", "Glen Canyon Dam", "Price-Stubb Dam", "Grand Valley Diversion Dam", 
"Windy Gap Dam", "Granby Dam", "Shadow Mountain Dam", "Total", 
"Blue Mesa Dam", "Dillon Dam", "Flaming Gorge Dam", "Fontenelle Dam", 
"Green Mountain Dam", "Joes Valley Dam", "McPhee Dam", "Morrow Point Dam", 
"Navajo Dam", "Ridges Basin Dam", "Ridgway Dam", "Ruedi Dam", 
"Scofield Dam", "Soldier Creek Dam", "Starvation Dam", "Taylor Park Dam", 
"Vallecito Dam", "Vega Dam", "Williams Fork Dam", "Wolford Mountain Dam", 
"Total", "Alamo Dam", "Bartlett Dam", "Coolidge Dam", "Horse Mesa Dam", 
"Horseshoe Dam", "Mormon Flat Dam", "New Waddell Dam", "Painted Rock Dam", 
"Sand Hollow Dam", "Stewart Mountain Dam", "Theodore Roosevelt Dam", 
"Total"), Owner = c("IBWC", "USBR", "USBR", "USBR", "BIA", "USBR", 
"USBR", "USBR", "USBR", "PCID[n 2]MCID[n 3]", "USBR", "Northern Water", 
"USBR", "USBR", "", "USBR", "Denver Water", "USBR", "USBR", "USBR", 
"USBR", "USBR", "USBR", "USBR", "USBR", "USBR", "USBR", "USBR", 
"USBR", "USBR", "USBR", "USBR", "USBR", "Denver Water", "CRWCD[n 6]", 
"", "USACE", "USBR", "BIA", "USBR", "USBR", "USBR", "USBR", "USACE", 
"WCWCD[n 9]", "USBR", "USBR", ""), Purpose = c("Irrigation", 
"Diversion", "Irrigation", "Diversion", "Irrigation", "HydropowerIrrigationMunicipal", 
"HydropowerRegulation", "Flood controlHydropowerIrrigationMunicipalRegulation", 
"HydropowerRegulation", "Irrigation", "Irrigation", "IrrigationMunicipal", 
"IrrigationMunicipal", "IrrigationMunicipal", "", "Flood controlHydropowerRegulation", 
"IrrigationMunicipal", "Flood controlHydropowerRegulation", "Flood controlIrrigation", 
"HydropowerRegulation", "IrrigationMunicipal", "Flood controlIrrigation", 
"Hydropower", "Flood controlIrrigationMunicipalRegulation", "Irrigation", 
"Flood controlIrrigation", "IrrigationMunicipal", "IrrigationMunicipal", 
"IrrigationMunicipal", "Irrigation", "Irrigation", "Irrigation", 
"Irrigation", "IrrigationMunicipal", "IrrigationMunicipal", "", 
"Flood control", "Flood controlIrrigation", "Flood controlIrrigation", 
"HydropowerRegulation", "Flood controlRegulation", "HydropowerRegulation", 
"IrrigationMunicipal", "Flood control", "IrrigationMunicipal", 
"HydropowerRegulation", "Flood controlHydropowerIrrigationMunicipal", 
""), Refs = c("[1]", "[2]", "[n 1][3]", "[4]", "[5][6]", "[7]", 
"[8][9]", "[10][11]", "[12][13]", "[n 4][14]", "[15]", "[16]", 
"[17]", "[18]", "", "[19]", "[20][21]", "[22]", "[23]", "[24][25]", 
"[26]", "[27][28]", "[29][30]", "[n 5][31][32]", "[33]", "[34]", 
"[35]", "[36]", "[37]", "[38]", "[39]", "[40]", "[41]", "[42]", 
"[43]", "", "[44]", "[45]", "[46]", "[n 7][48]", "[49]", "[n 8][50]", 
"[51]", "[52]", "[52]", "[n 10][53]", "[n 11][54]", ""), `ResCapacity(AF)` = c(NA, 
NA, 160000, NA, NA, 646200, 1818300, 28945000, 26214900, NA, 
NA, 445, 539800, 18400, 58343045, 940700, 257304, 3788700, 345360, 
153639, 54920, 381195, 117190, 1708600, 120000, 84410, 102000, 
73600, 1127610, 167300, 106200, 129700, 33800, 96822, 66000, 
9821250, 1043000, 176186, 910000, 245138, 131500, 57852, 1108600, 
2491700, 51360, 69765, 2910200, 9195301), Reservoir = c("N/A", 
"N/A", "Imperial Reservoir", "N/A", "Moovalya Lake", "Lake Havasu", 
"Lake Mohave", "Lake Mead", "Lake Powell", "N/A", "N/A", "Windy Gap Reservoir", 
"Lake Granby", "Shadow Mountain Lake", "", "Blue Mesa Reservoir", 
"Dillon Reservoir", "Flaming Gorge Reservoir", "Fontenelle Reservoir", 
"Green Mountain Reservoir", "Joes Valley Reservoir", "McPhee Reservoir", 
"Morrow Point Reservoir", "Navajo Lake", "Lake Nighthorse", "Ridgway Reservoir", 
"Ruedi Reservoir", "Scofield Reservoir", "Strawberry Reservoir", 
"Starvation Reservoir", "Taylor Park Reservoir", "Vallecito Reservoir", 
"Vega Reservoir", "Williams Fork Reservoir", "Wolford Mountain Reservoir", 
"", "Alamo Lake", "Bartlett Lake", "San Carlos Lake", "Apache Lake", 
"Horseshoe Lake", "Canyon Lake", "Lake Pleasant", "Painted Rock Reservoir", 
"Sand Hollow Reservoir", "Saguaro Lake", "Theodore Roosevelt Lake", 
""), State = c("AZ BC", "AZ CA", "AZ CA", "AZ CA", "AZ CA", 
"AZ CA", "AZ NV", "AZ NV", "AZ", "CO", "CO", "CO", "CO", "CO", 
"", "CO", "CO", "UT", "WY", "CO", "UT", "CO", "CO", "NM", "CO", 
"CO", "CO", "UT", "UT", "UT", "CO", "CO", "CO", "CO", "CO", "", 
"AZ", "AZ", "AZ", "AZ", "AZ", "AZ", "AZ", "AZ", "UT", "AZ", "AZ", 
""), Yearcompleted = c(1950L, 1905L, 1938L, 1958L, 1941L, 1938L, 
1951L, 1936L, 1966L, 1911L, 1916L, 1970L, 1950L, 1946L, NA, 1966L, 
1963L, 1964L, 1964L, 1943L, 1966L, 1984L, 1968L, 1962L, 2007L, 
1987L, 1968L, 1946L, 1974L, 1970L, 1937L, 1941L, 1959L, 1959L, 
1996L, NA, 1968L, 1939L, 1930L, 1927L, 1946L, 1925L, 1994L, 1960L, 
2002L, 1930L, 1911L, NA)), row.names = c(NA, -48L), class = c("tbl_df", 
"tbl", "data.frame"))