A257458 Indices of prime powers in A257339.
1, 2, 3, 4, 5, 6, 8, 9, 10, 11, 12, 13, 14, 15, 17, 18, 19, 20, 22, 23, 25, 27, 30, 31, 34, 35, 38, 42, 45, 47, 48, 49, 52, 53, 54, 60, 61, 63, 64, 66, 69, 70, 71, 73, 74, 81, 83, 85, 87, 89, 92, 94, 97, 100, 102, 108, 112, 114, 116, 117, 120, 125, 127, 128
Offset: 1
Keywords
Links
- Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
Programs
-
Haskell
a257458 n = a257458_list !! (n-1) a257458_list = filter ((== 1) . a010055 . a257339) [1..]
Comments