A093025 Indices of terms in A093019 with value 5.
7, 12, 26, 31, 45, 50, 69, 74, 88, 93, 106, 111, 125, 130, 149, 154, 168, 173, 187, 192, 205, 210, 229, 234, 248, 253, 267, 272, 286, 291, 309, 314, 328, 333, 347, 352, 366, 371, 385, 390, 408, 413, 427, 432, 446, 451, 465, 470, 489, 494, 502, 516, 521, 535
Offset: 1
Examples
12 is in the sequence because A093019(12)=5; 125 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
Programs
-
Haskell
a093025 n = a093025_list !! (n-1) a093025_list = filter ((== 5) . a093019) [0..] -- Reinhard Zumkeller, Nov 08 2014
Formula
A093019(a(n)) = 5. - Reinhard Zumkeller, Nov 08 2014
Extensions
Offset changed by Reinhard Zumkeller, Nov 08 2014
Comments