1,2

A209229(A051145(a(n))) = 1;

the definition of this sequence was the original definition of A051147.

Table of n, a(n) for n=1..33.

(Haskell)

import Data.List (findIndices)

a244747 n = a244747_list !! (n-1)

a244747_list = findIndices ((== 1) . a209229) a051145_list

Cf. A209229, A051147 (subsequence).

Sequence in context: A292444 A035948 A258939 * A241742 A212584 A166048

Adjacent sequences: A244744 A244745 A244746 * A244748 A244749 A244750

nonn

Reinhard Zumkeller, Jul 05 2014

approved