A353488 If A276086(n) is of the form 4k+1, then a(n) = 1, otherwise a(n) = 0.

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

Offset

0

Links

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

Index entries for characteristic functions

Index entries for sequences related to primorial base

Formula

a(n) = 1 iff A353486(n) = 1, and 0 otherwise.

a(n) = A059841(n) - A353489(n).

Prog

(PARI)
A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };
A353488(n) = (1==(A276086(n)%4));

Crossrefs

Characteristic function of A353465.

Cf. A059841, A276086, A353486, A353487, A353489.

Sequence in context: A267056 A089024 A355688 * A232991 A168553 A267636

Adjacent sequences: A353485 A353486 A353487 * A353489 A353490 A353491

Keyword

nonn,base

Author

Antti Karttunen, Apr 24 2022

Status

approved