Is it a Chinese resident identity card number?

Is it a Chinese resident identity card number?

Usage

is_chinese_resident_id(x)

Arguments

x

A character vector.

Value

Logical vector; TRUE for an 18-character ID whose ISO 7064 mod-11-2 check character is valid.

See also

Other gov detectors: is_dea(), is_ein(), is_naics(), is_ssn(), is_uei()

Examples

is_chinese_resident_id(c("141002197808194474", NA))
#> [1] TRUE   NA