A251241 Indices of prime powers in A098550.

1, 2, 3, 4, 5, 6, 9, 11, 14, 15, 19, 22, 23, 29, 30, 40, 43, 51, 57, 61, 62, 65, 79, 87, 88, 94, 101, 114, 124, 127, 132, 137, 142, 153, 158, 167, 171, 175, 187, 194, 204, 215, 222, 233, 238, 247, 269, 273, 274, 277, 283, 296, 301, 313, 324, 329, 338, 355

Offset: 1

Author

Reinhard Zumkeller, Dec 02 2014

Keywords

• nonn

Comments

A010055(A098550(a(n))) = 1; for n > 0: A100995(A098550(a(n))) > 0;

A098550(a(n)) = A000961(n).

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..5000

Crossrefs

Cf. A098550, A000961, A010055, A100995, subsequences: A251239 and A251240.

Programs

Haskell

a251241 n = a251241_list !! (n-1)
a251241_list = filter ((== 1) . a010055 . a098550) [1..]