OFFSET
1,1
COMMENTS
Discriminant=-51.
Also: Primes which are squares (mod 51). Differs from the subsequence A106903 (because x^2+xy+y^2 = (x+y)^2 - (x+y)y + y^2) from a(20) = 463 on, A106903(20) = 523. Terms which are not in A106903 are: 463, 631, 1033, 1039, 1279, 1291,... Up to 1279 these are also in A139643. Cf. also A191034. - M. F. Hasler, Jan 15 2016
LINKS
Vincenzo Librandi and Ray Chandler, Table of n, a(n) for n = 1..10000 [First 1000 terms from Vincenzo Librandi]
N. J. A. Sloane et al., Binary Quadratic Forms and OEIS (Index to related sequences, programs, references)
MATHEMATICA
QuadPrimes2[1, -1, 13, 10000] (* see A106856 *)
PROG
(PARI) select(p->issquare(Mod(p, 51))&&isprime(p), [1..1500]) \\ See A106903 for alternative code. - M. F. Hasler, Jan 15 2016
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
T. D. Noe, May 09 2005
STATUS
approved