pin_ctrl: Check control number from 'pin'

In rOpenGov/sweidnumbr: Handling of Swedish Identity Numbers

Check control number from pin

Description

Calculates the control number using the Luhn algorithm and compare it with the control number in the personal identity number.

Usage

pin_ctrl(pin, force_logical = FALSE)

Arguments

pin	A vector of class pin. See as.pin.
force_logical	If TRUE, force all NA in pin to be FALSE. Default is FALSE.

Value

Logical vector indicating if a pin is correct (TRUE) or not (FALSE)

References

• Skatteverket, Population registration in Sweden. SKV 717B. (2007)

• Skatteverket, Personnummer. SKV 704. (2007) SOU 2008:60 : Personnummer och samordningsnummer, (2008)

Examples

# Examples taken from SKV 704 (see references)
ex_pin <- c("196408233234", "196408233235")
pin_ctrl(ex_pin)

rOpenGov/sweidnumbr documentation built on Jan. 19, 2024, noon