A289618 a(n) = A289617(n) - A046645(n) = A005187(A001222(n)) - A046645(n).

0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 2, 0, 1, 0, 0, 0, 1, 0, 0, 1, 1, 1, 1, 0, 1, 1, 2, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 2, 1, 2, 1, 1, 0, 2, 0, 1, 0, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 1, 0, 0, 1, 1, 0, 0, 0, 1, 0, 2, 1, 1, 1, 2, 0, 2, 1, 0, 1, 1, 1, 1, 0, 0, 0, 1, 0, 1, 0, 2, 1, 1, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 0, 1, 1, 2

Offset

1,24

Links

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

Index entries for sequences computed from exponents in factorization of n

Formula

a(n) = A289617(n) - A046645(n) = A005187(A001222(n)) - A046645(n).

Prog

(Scheme) (define (A289618 n) (- (A289617 n) (A046645 n)))

Crossrefs

Cf. A046645, A289617.

Cf. A268375 (positions of zeros), A289619 (of ones).

Sequence in context: A239657 A298934 A309061 * A161520 A070097 A202523

Adjacent sequences: A289615 A289616 A289617 * A289619 A289620 A289621

Keyword

nonn

Author

Antti Karttunen, Jul 08 2017

Status

approved