frsprogramcodes DATA EPA programs listed in Facility Registry Service
Source:R/data_frsprogramcodes.R
      frsprogramcodes.Rddata.frame
                                                                         description     code
1               National Pollutant Discharge Elimination System (NPDES) (ICIS-NPDES)    NPDES
2             The Integrated Compliance Information System (ICIS) for Air (ICIS-Air)      AIR
3               The Resource Conservation and Recovery Act (RCRA) Information System RCRAINFO
4                                              Risk Management Plan (RMP) facilities      RMP
5                                 The Safe Drinking Water Information System (SDWIS)     SFDW
6                                         The Superfund Enterprise Management System     SEMS
7                                         Clean Air Markets Division Business System   CAMDBS
8                                                   Toxics Release Inventory Program     TRIS
9                                                   Greenhouse Gas Reporting Program   E-GGRT
10                                                      Emissions Inventory System        EIS
11                                                    Toxic Substances Control Act       TSCA
12     Assessment, Cleanup and Redevelopment Exchange System (ACRES) for Brownfields    ACRES
13   Biennial Reporters (BR) Hazardous Waste Treatment, Storage, Disposal Facilities       BRDetails
Created by script in /data-raw/
Also see EPA documentation describing each program code aka data source.
Examples
# \donttest{
  frs_by_programid[program %in% frsprogramcodes$code, .N, by=program]
#>      program      N
#>       <char>  <int>
#>  1:     TRIS  34092
#>  2:      AIR 134028
#>  3:     SFDW  40302
#>  4:      EIS 121499
#>  5:   E-GGRT   6018
#>  6:    ACRES  35596
#>  7:   CAMDBS    717
#>  8:     TSCA  13934
#>  9: RCRAINFO 528499
#> 10:     SEMS  11216
#> 11:    NPDES 401604
#> 12:       BR   5672
  
  setkey(frs_by_programid,"program")
#> Error in setkey(frs_by_programid, "program"): could not find function "setkey"
  frs_by_programid["TRIS",]
#> Key: <pgm_sys_id, program, REGISTRY_ID>
#>      lat   lon REGISTRY_ID PGM_SYS_ACRNMS program pgm_sys_id
#>    <num> <num>      <char>         <char>  <char>     <char>
#> 1:    NA    NA        <NA>           <NA>    <NA>       TRIS
  # }