Input original NTEE code and return disaggregated NTEE code.
All known NTEE codes and their respective disaggregated codes are stored
in ntee-crosswalk
data set. All NTEE codes without a further categroization
can be found at https://nccs.urban.org/publication/irs-activity-codes.
In this appraisal process, this function is used to calculated distances between mission codes.
Arguments
- old.code
character string of original NTEE code. See above NTEE Codes Vignette for acceptable NTEE Codes.
Value
A list with new.code
, the new disaggregated code, and other related values.
See NTEE Codes Vignette on how these values are calculated.
Examples
get_new_ntee("H96")
#> $old.code
#> [1] "H96"
#>
#> $new.code
#> [1] "RG-HEL-H96"
#>
#> $type.org
#> [1] "RG"
#>
#> $broad.category
#> [1] "HEL"
#>
#> $major.group
#> [1] "H"
#>
#> $univ
#> [1] FALSE
#>
#> $hosp
#> [1] FALSE
#>
#> $two.digit
#> [1] "96"
#>
#> $further.category
#> [1] NA
#>
#> $division.subdivision
#> [1] "96"
#>
#> $division
#> [1] "9"
#>
#> $subdivision
#> [1] "6"
#>
get_new_ntee("R02")
#> $old.code
#> [1] "R02"
#>
#> $new.code
#> [1] "MT-PSB-R00"
#>
#> $type.org
#> [1] "MT"
#>
#> $broad.category
#> [1] "PSB"
#>
#> $major.group
#> [1] "R"
#>
#> $univ
#> [1] FALSE
#>
#> $hosp
#> [1] FALSE
#>
#> $two.digit
#> [1] "02"
#>
#> $further.category
#> [1] NA
#>
#> $division.subdivision
#> [1] "00"
#>
#> $division
#> [1] "0"
#>
#> $subdivision
#> [1] "0"
#>
get_new_ntee("R0226")
#> $old.code
#> [1] "R0226"
#>
#> $new.code
#> [1] "MT-PSB-R26"
#>
#> $type.org
#> [1] "MT"
#>
#> $broad.category
#> [1] "PSB"
#>
#> $major.group
#> [1] "R"
#>
#> $univ
#> [1] FALSE
#>
#> $hosp
#> [1] FALSE
#>
#> $two.digit
#> [1] "02"
#>
#> $further.category
#> [1] 26
#>
#> $division.subdivision
#> [1] "26"
#>
#> $division
#> [1] "2"
#>
#> $subdivision
#> [1] "6"
#>