Takes character input and returns standard yspec numeric value for Race

Takes character input and returns standard yspec numeric value for Race

racen(racec)

Arguments

racec

Race character

Value

the standard yspec numeric value for the inputted Race character

Examples

racen("WHITE") # 1
#> [1] 1

racen("BLACK") # 2
#> [1] 2

racen("ASIAN") # 3
#> [1] 3

racen("OTHER") # 4
#> [1] 4

racen("UNKNOWN") # -999
#> [1] -999