OFFSET
1,2
COMMENTS
Or, numbers n such that 3+3n+n^2 is prime.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
7 is a term because 7*8/2+9*10/2=73 is prime;
11 is a term because 11*12/2+13*14/2=157 is prime.
MAPLE
select(t -> isprime(3+3*t+t^2), [$1..10000]); # Robert Israel, May 19 2014
MATHEMATICA
Select[Range[300], PrimeQ[3+3#+#^2]&]
Position[Partition[Accumulate[Range[250]], 3, 1], _?(PrimeQ[#[[1]]+ #[[3]]]&), 1, Heads->False]//Flatten (* Harvey P. Dale, Sep 04 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Apr 10 2007
STATUS
approved