A244992 Characteristic function for A244991: a(n) = A000035(A061395(n)).

0, 1, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1, 1, 0, 0, 1, 0, 1, 1, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1, 0, 0, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1

Offset

1

Comments

If a(n) = 1, then the largest prime p_k [where p_k = A000040(k) = A006530(n) and k = A061395(n)] dividing n has an odd index (i.e. k = 2h+1), otherwise, when a(n) = 0, it means that either n = 1 or the largest prime p_k|n has an even index (k = 2h).

Links

Antti Karttunen, Table of n, a(n) for n = 1..10001

Formula

a(n) = A000035(A061395(n)).

For all n >= 1, a(n) = A066829(A122111(n)) and vice versa, A066829(n) = a(A122111(n)).

For all n >= 1, a(n) = 1 - A000035(A244321(n)) and a(A244322(n)) = 1 - A000035(n).

Prog

(Scheme) (define (A244992 n) (A000035 (A061395 n)))

Crossrefs

Cf. A244991, A000035, A006530, A061395, A066829, A122111, A244321, A244322.

Sequence in context: A086747 A188973 A188970 * A286685 A284878 A118006

Adjacent sequences: A244989 A244990 A244991 * A244993 A244994 A244995

Keyword

nonn

Author

Antti Karttunen, Jul 21 2014

Status

approved