|
2, 16, 21, 35, 40, 59, 64, 78, 83, 97, 101, 115, 120, 139, 144, 158, 163, 177, 182, 196, 200, 219, 224, 238, 243, 257, 262, 276, 281, 295, 304, 318, 323, 337, 342, 356, 361, 375, 380, 399, 403, 417, 422, 436, 441, 455, 460, 479, 484, 498, 506, 511, 525, 530
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Integers which require a following 6 to have a valid Luhn mod 10 check digit.
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
16 is in the sequence because A093019(16)=6; 166 has a valid Luhn mod 10 check digit.
|
|
PROG
|
(Haskell)
a093026 n = a093026_list !! (n-1)
a093026_list = filter ((== 6) . a093019) [0..]
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|