A354033 a(n) = 1 if n > 1 and n is a power of a prime of the form 4m+3, otherwise 0.

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

Offset

1

Links

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

Index entries for characteristic functions

Formula

a(n) = A174275(n) - A354031(n).

a(n) >= A354028(n).

Prog

(PARI) A354033(n) = { my(p=0); (isprimepower(n, &p) && (3==(p%4))); };

Crossrefs

Characteristic function of A197504 \ {1}.

Cf. A002145, A174275, A354028, A354031.

Sequence in context: A049320 A284817 A309766 * A328979 A358227 A284524

Adjacent sequences: A354030 A354031 A354032 * A354034 A354035 A354036

Keyword

nonn

Author

Antti Karttunen, May 15 2022

Status

approved