OFFSET
1,1
REFERENCES
L. Poletti, Le serie dei numeri primi appartenente alle due forme quadratiche (A) n^2+n+1 e (B) n^2+n-1 per l'intervallo compreso entro 121 milioni, e cioè per tutti i valori di n fino a 11000, Atti della Reale Accademia Nazionale dei Lincei, Memorie della Classe di Scienze Fisiche, Matematiche e Naturali, s. 6, v. 3 (1929), pages 193-218.
LINKS
Michel Marcus, Table of n, a(n) for n = 1..10000
C. K. Caldwell, Composite Numbers
EXAMPLE
n=1 gives 1^2+1+1=3, which is prime and so not a term, and similarly for n=2,3; n=4 gives 21=3*7, which is a(1).
MAPLE
with(numtheory):for n from 0 to 200 do:x:=n^2+n+1: if type(x, prime)=false then print (x):else fi:od:
MATHEMATICA
Select[Array[ #^2+#+1&, 6!, 2], !PrimeQ[ # ]&] (* Vladimir Joseph Stephan Orlovsky, Apr 07 2010 *)
PROG
(PARI) isok(k) = (k>1) && !isprime(k) && issquare(4*k-3); \\ Michel Marcus, Apr 20 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, Apr 02 2010
EXTENSIONS
Example edited and keyword uned removed by D. S. McNeil, Nov 17 2010
STATUS
approved