A295306 a(n) = +1 if tau(sigma(n)) > tau(n), -1 if n < tau(sigma(n)) < tau(n), and 0 if tau(sigma(n)) = tau(n), where tau = A000005 and sigma = A000203.

0, 0, 1, -1, 1, 1, 1, 0, -1, 1, 1, 0, 1, 1, 1, -1, 1, -1, 1, 1, 1, 1, 1, 1, -1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, -1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, -1, 1, -1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, -1, 1, 1, 1, 1, 1, 1, 1, -1, 1, 1, 0, 1, 1, 1, 1, -1, -1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, -1, 1, 1, 1, 1, 1

Offset

1

Links

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

Formula

a(n) = sign(A295305(n)) = sign(A000005(A000203(n)) - A000005(n)).

Prog

(PARI) A295306(n) = sign(numdiv(sigma(n)) - numdiv(n));

Crossrefs

Cf. A000005, A000203, A062068, A295305.

Cf. A037197 (positions of 0'ss), A073803 (of +1's), A073804 (of -1's).

Sequence in context: A368625 A086823 A228487 * A295303 A288226 A104121

Adjacent sequences: A295303 A295304 A295305 * A295307 A295308 A295309

Keyword

sign

Author

Antti Karttunen, Nov 21 2017

Status

approved