OFFSET
1,1
EXAMPLE
17=(1+2)*3+(1+3)*2.
MATHEMATICA
f[n_]:=(2+n)*(1+2*n)+(1+n)*(2+2*n); lst={}; Do[If[PrimeQ[f[n]], AppendTo[lst, f[n]]], {n, 6!}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Dec 17 2009
STATUS
approved