A251391 Indices of squarefree numbers in A098550.

1, 2, 3, 7, 8, 9, 10, 13, 15, 16, 17, 20, 21, 22, 23, 24, 25, 28, 30, 32, 34, 35, 36, 38, 39, 41, 43, 44, 45, 47, 49, 51, 53, 56, 59, 60, 61, 62, 63, 64, 68, 70, 72, 73, 74, 77, 78, 79, 80, 81, 85, 86, 87, 88, 89, 90, 95, 96, 98, 99, 100, 101, 103, 105, 109

Offset: 1

Author

Reinhard Zumkeller, Dec 02 2014

Keywords

• nonn

Comments

A008966(A098550(a(n))) = 1; A100112(A098550(a(n))) > 0;

A098550(a(n)) = A005117(n).

Links

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

Crossrefs

Cf. A098550, A005117, A008966, A100112, A251239 (subsequence).

Programs

Haskell

a251391 n = a251391_list !! (n-1)
a251391_list = filter ((== 1) . a008966 . fromIntegral . a098550) [1..]