A093024 Indices of terms in A093019 with value 4.

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

Author

Ray Chandler, Apr 03 2004

Keywords

• easy
• nonn
• base

Comments

Integers which require a following 4 to have a valid Luhn mod 10 check digit.

Examples

			17 is in the sequence because A093019(17)=4; 174 has a valid Luhn mod 10 check digit.
		

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
• John Kilgo, Using the Luhn Algorithm, DotNetJohn.com.
• Webopedia, Luhn formula
• Wikipedia, Luhn algorithm
• Index entries for sequences related to decimal expansion of n

Crossrefs

Cf. A093017-A093029.

Programs

Haskell

a093024 n = a093024_list !! (n-1)
a093024_list = filter ((== 4) . a093019) [0..]
-- Reinhard Zumkeller, Nov 08 2014

Formula

A093019(a(n)) = 4. - Reinhard Zumkeller, Nov 08 2014

Extensions

Offset changed by Reinhard Zumkeller, Nov 08 2014