login
A093024
Indices of terms in A093019 with value 4.
1
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
OFFSET
1,1
COMMENTS
Integers which require a following 4 to have a valid Luhn mod 10 check digit.
FORMULA
A093019(a(n)) = 4. - Reinhard Zumkeller, Nov 08 2014
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..]
-- Reinhard Zumkeller, Nov 08 2014
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Ray Chandler, Apr 03 2004
EXTENSIONS
Offset changed by Reinhard Zumkeller, Nov 08 2014
STATUS
approved