Check if a number passes the Luhn algorithm

This function checks if a given number passes the Luhn algorithm. It is commonly used to validate credit card numbers.

Usage

checkLuhn(number)

Arguments

number

A character string of the number to check against the Luhn algorithm.

Value

A logical value indicating whether the number passes the Luhn algorithm (TRUE) or not (FALSE).

Examples

checkLuhn("4532015112830366") # TRUE
#> [1] TRUE
checkLuhn("4532015112830367") # FALSE
#> [1] FALSE