|
3, 17, 22, 36, 41, 55, 60, 79, 84, 98, 102, 116, 121, 135, 140, 159, 164, 178, 183, 197, 201, 215, 220, 239, 244, 258, 263, 277, 282, 296, 300, 319, 324, 338, 343, 357, 362, 376, 381, 395, 404, 418, 423, 437, 442, 456, 461, 475, 480, 499, 507, 512, 526, 531
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Integers which require a following 4 to have a valid Luhn mod 10 check digit.
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
17 is in the sequence because A093019(17)=4; 174 has a valid Luhn mod 10 check digit.
|
|
PROG
|
(Haskell)
a093024 n = a093024_list !! (n-1)
a093024_list = filter ((== 4) . a093019) [0..]
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|