A135461 a(n) = 1 if n is the norm of an Eisenstein prime (see A055664) otherwise 0.

0, 0, 0, 1, 1, 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, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 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, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0

Offset

0,1

References

L. W. Reid, The Elements of the Theory of Algebraic Numbers, MacMillan, NY, 1910, see Chap. VI.

Links

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

Index entries for characteristic functions

Example

The smallest primes are 1-omega (of norm 3) and 2 (of norm 4).

Prog

(PARI) A135461(n) = (isprime(n) && n%3<2) || (issquare(n, &n) && isprime(n) && n%3==2); \\ This is Charles R Greathouse IV's Apr 30 2013 code (with name "is") for A055664. - Antti Karttunen, Dec 06 2017

Crossrefs

Cf. A055667, A135462.

Characteristic function of A055664.

Sequence in context: A179827 A285133 A011658 * A327219 A274950 A093383

Adjacent sequences: A135458 A135459 A135460 * A135462 A135463 A135464

Keyword

nonn

Author

N. J. A. Sloane, Feb 06 2008

Status

approved