OFFSET
1,1
COMMENTS
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
Bernard Schott, Les nombres brésiliens, Quadrature, no. 76, avril-juin 2010, pages 30-38.
Bernard Schott, Les nombres brésiliens, Reprinted from Quadrature, no. 76, avril-juin 2010, pages 30-38, included here with permission from the editors of Quadrature.
MATHEMATICA
Select[Table[If[PrimeQ[n], Nothing, n^2+n+1], {n, 200}], PrimeQ] (* Harvey P. Dale, Apr 02 2023 *)
PROG
(PARI) lista(nn) = {for (n = 1, nn, if (! isprime(n) && isprime(p = n^2 + n + 1), print1(p, ", "); ); ); } \\ Michel Marcus, Sep 04 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Bernard Schott, Dec 18 2012
STATUS
approved