reviewed

approved

proposed

reviewed

editing

proposed

Antti Karttunen, <a href="/A359606/b359606.txt">Table of n, a(n) for n = 1..65537</a>

approved

editing

proposed

approved

editing

proposed

allocateda(n) = 1 if forA355690(n) is Anttinegative (-1), otherwise Karttunen0.

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

1

<a href="/index/Ch#char_fns">Index entries for characteristic functions</a>

a(n) = A359605(n) - A355690(n).

a(n) = A359590(n) - A359605(n).

(PARI)

A010892(n) = ([1, 1, 0, -1, -1, 0][n%6 + 1]);

A355690(n) = { my(f = factor(n)); prod(k=1, #f~, if(2==f[k, 1], A010892(1+f[k, 2]), -(1==f[k, 2]))); };

A359606(n) = (A355690(n)<0);

Cf. A355690, A359590, A359605.

allocated

nonn,easy

Antti Karttunen, Jan 12 2023

approved

editing

allocated for Antti Karttunen

allocated

approved