A374136 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A374136

a(n) = 1 if n is odd and the cyclotomic polynomial Phi(k,x) has height 1, i.e., is flat, otherwise 0. Here flat means that the coefficients of a polynomial are all -1, 0, or 1.

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

(list; graph; refs; listen; history; text; internal format)

OFFSET

LINKS

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

Index entries for characteristic functions

PROG

(PARI) A374136(n) = (n%2 && 1==vecmax(abs(Vec(polcyclo(n)))));

CROSSREFS

Characteristic function of A374137.

Differs from A000035 first at n=105, where a(105) = 0, while A000035(105) = 1.

Differs from A374134 first at n=255, where a(255) = 0, while A374134(255) = 1.

Sequence in context: A056594 A101455 A374134 * A091337 A166698 A250299

Adjacent sequences: A374133 A374134 A374135 * A374137 A374138 A374139

KEYWORD

nonn

AUTHOR

Antti Karttunen, Jul 06 2024

STATUS

approved