login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A093018 Natural numbers with appended Luhn mod 10 check digit. 8
0, 18, 26, 34, 42, 59, 67, 75, 83, 91, 109, 117, 125, 133, 141, 158, 166, 174, 182, 190, 208, 216, 224, 232, 240, 257, 265, 273, 281, 299, 307, 315, 323, 331, 349, 356, 364, 372, 380, 398, 406, 414, 422, 430, 448, 455, 463, 471, 489, 497, 505, 513, 521, 539 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,2
COMMENTS
Indices of terms in A093017 == 0 mod 10.
A249832(a(n)) = 1; A093017(a(n)) mod 10 = 0; a(n) = 10*n + A093019(n); A093019(n) = a(n) mod 10. - Reinhard Zumkeller, Nov 08 2014
The sequence includes all Canadian Social Insurance Numbers, as well as all modern credit and debit card numbers. - Mathew Englander, Aug 04 2021
LINKS
John Kilgo, DotNetJohn.com, Using the Luhn Algorithm
Webopedia, Luhn formula
Wikipedia, Luhn algorithm
EXAMPLE
18 is in the sequence because A093017(18)=10 == 0 mod 10.
59 is in the sequence because A093017(59)=10 == 0 mod 10.
PROG
(Haskell)
a093018 n = a093018_list !! n
a093018_list = filter ((== 1) . a249832) [0..]
-- Reinhard Zumkeller, Nov 08 2014
CROSSREFS
Cf. A249832, A093017, A249830 (complement), A249854, A249855, A010879.
Sequence in context: A229967 A212049 A212052 * A284493 A337523 A167336
KEYWORD
easy,nonn,base
AUTHOR
Ray Chandler, Apr 03 2004
EXTENSIONS
Original name end comment interchanged by Reinhard Zumkeller, Nov 08 2014
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 20:05 EDT 2024. Contains 371254 sequences. (Running on oeis4.)